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Now you can access LUCID, DISK +, 
WRITE ROM, RAM+ and others 
instantly. 


The 6 ROM BANK plus battery pack lets 
you have the ultimate Model 100 system. 
When you get your unit just press in up 
to 6 ROMS into the sockets then push in 
a simple plug into your Model 100's ROM 
Socket. The ROM bank has two posts on 
either end that insert into the two little 
holes on the underside of your Model 100. 


The ROM bank props up the Model 100 at 
the same angle and height as those 
little legs you've seen. The ROM BANK 
itself is only about 1*2" deep and it runs 
the width of your Model 100. It only weighs 
one pound. It not only installs instantly, 
but it pops free in a second if you need 
everything to lie flat in a briefcase. 


A joint PCSG/CRYPTRONICS project. 










Change from ROM to ROM with the 
touch of a thumb switch. 


You can go from LUCID to WRITE to 
DISK + to any other ROMS just by turn- 
ing the thumb switch at the side of the 
ROM bank. The 6 ROM BANK is a sturdy 
well built construction that looks like it is 
a part of your Model 100. 


What is also fantastic is that the ROM 
bank has a powerful NICAD battery and 
recharger built right in. This power source 
supplies up to 30 hours of life to your 
Mode! 100 with just 6 hours of recharge. 
What's nice is that it recharges right from 
your Model 100's power adapter. This is 
a quick charge system and if you need 
power in a hurry, you can get 6 hours of 
life for your Model 100 by just charging for 
an hour and half. 


PORTABLE CONARUTER SURORT ORQ P 


11035 Harry Hines Blvd. No. 207, Dallas, Tx. 75229 
VISA / MASTER CARD / AM. EXP. / C.O.D. 


plus powerful Nicad 
battery pack that gives 
30 hours of power 
to your Model 100 


Suddenly, the Model 100 is a very 
powerful computer. 


If you have the HOLMES portable disk 
drive with its powerful bundled database 
software package or the CRYPTRONICS 
128K RAM expansion along with LUCID, 
WRITE ROM and DISK + in the 6 ROM 
bank with its rapid rechargable NICAD 
power source, you have the ultimate port- 
able system. It's all available only from 
PCSG. 


As usual we don't want you to take our 
word for it. The 6 ROM BANK is sold on 
a 30 day trial. If you are not satisfied 
simply return within thirty days for a full 
refund. MC, VISA, AM. EX. or C.O.D. 


1-214-351-0564 
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Each and every month, PCM 
offers an assortment of pro- 
grams for the home and office — 
utilities, business applications, 
games and more — all for the 
price of typing in the listings. 


If you’re a person on the move, 
and too busy to spend time typ- 
ing lengthy listings, then PCM has 
just what you need — 

PCM ON DISK. 


PCM ON DISK 

The Falsoft Building 
P.O. Box 385 
Prospect, KY 40059 
(502) 228-4492 
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PCM ON DISK provides each 
issue's MS-DOS programs ready 
to load and run with only a few 


That means you get a disk 
keystrokes! 


each month for a year, 
containing all programs listed 
in that month's issue, for an 
average cost of only $8.25!* 
We think it's worth your time to 
subscribe. 


AS AN ADDED BONUS, PCM ON 
DISK will include PCM's portable 
computer programs, which may 
be downloaded to portables for 
those readers who have both an 
MS-DOS machine and one of 


: *Disks for individual issues (beginnin 
Tandy's portable computers. 4 


this month) may be ordered for only 
$12 each. 











O Full Year's Subscription (specify starting month) 


O Single Volume (specify month(s) & year) 





Name 





Address 





City State ZIP 





Payment Enclosed O 
Charge VisaQ) MasterCard [] American Express O 


My Account# 





Card Exp. Date 





Signature 


*Subscriptions to PCM ON DISK are $99 a year in the United States. Canadian rate U.S. $115. All other countries U.S 
$130; PCM ON DISK single copy rate is: $12 within the U.S.; U.S. $14, Canadian rate; U.S. $16, all other countries. Kentucky 
residents add 596 sales tax. All subscriptions begin with the current issue unless otherwise specified. Please allow 5 to 6 
weeks for first copy. U.S. currency only, please. In order to hold down non-editorial costs, we do not bill 
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Tandy computers 
offer everything 





Check out the software that completes their "νην 


Tandy MS-DOS Software Comparison Chart 


|_| teleport | ^. |Smalware 
File/Report II mallware 
CHARACT EM TUR ees 
CHARACTERISTICS: 

CIE | YES V] 


Allows user to create integrated 
business systems 
Developed systems and data can be 
moved to multi-user environments 


μα ον 


FEATURES: 


Full-screen facility for creating 
custom screen layouts 
Full-screen facility for creating 
custom report layouts 
Built-in field types 
(error checking) 
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ilePro° 


The new Tandy computers 
can really speed things up. If 
you don't let obsolete 
software bog you down. 

Try filePro 16, the latest 
generation of data base 
software from the authors of 
Profile®. 

Choose it for its power 
(check our capacities); its 
ease-of-use (check our 
features); and its unique 
ability to grow as your needs 
grow, and even move the 
systems you create to multi- 
user computers. 

filePro is available for the 
Tandy 1000, 1200 and 2000 
computers (hard disk 
required). Available directly 
from us or through your 
Radio Shack store’s Express 
Order Software service. 


To order, call 

(800) 847-4740. 

For customer service or 
when p: in New York 
State, call (212) 398-9290. 
Ask for Smallware sales. 
Visa and MasterCard 
accepted. 

Also available for other computers, 


including IBM PC, IBM PC-XT, and 
NCR Decision Mate. utili 






(&» The Small Computer Company, Inc. 


«- 230 West 41st Street, Suite 1200, New York, New York 10036 


Smallware and filePro are registered trademarks of The Small Computer Company, Inc. dBase II is a trademark of Ashton-Tate. pfs File/Report 
is a registered trademark of Software Publishing. Profile is a registered trademark of Tandy Corporation. 
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Exciting Times 





[ies are heady and exciting times 
here at PCM. Back in the early 
days of our publishing history, I 
was the one who opened the mail every 
day because, primarily, I was the only 
one working here. Over the years, we’ve 
added a few people and someone else 
opens the mail every weekday. Some 
days, even with some machines to help 
do the job, it takes a couple of hours. 

But on Saturday mornings, I still get 
the mail and go through it (they won't 
let me open it because they're afraid I'll 
mess something up). It's something I 
really like to do — it keeps me "current" 
on what is coming in and what is hap- 
pening here. 

For the past couple of months, it's 
been more exciting than it has been for 
a long time. And much of the excite- 
ment revolves around PCM. We're 
getting more mail, more letters, more 
subscription orders and the like than 
ever before. 

Of course, THE RAINBOW, our first 
magazine, still gets tons of mail. But, 
over the years, we've grown accustomed 
to that volume. 

Someone asked me the other day 
whether Tandy "really did" sell more 
1000s over the last few months than 
IBM sold PCs. Well, based on our mail, 
Id have to certainly agree! The mail 
volume seems to be an upward curve 
that grows exponentially. 

You're holding one result of that in 
your hands — a larger PCM. Size of 
magazines is based primarily on the 
amount of advertising space that we 
sell, and as this market continues to 
grow by leaps and bounds, so does the 
advertising. As it grows, so does the size 
of the magazine. As you can see, we're 
up to 132 pages this month. Less than 
a year ago we were at 78. And, while 
that means more pages of advertising 
income, it also means more pages of 
programs, articles, tutorials and reviews 


for you to read and use. It works for all 
of us. 

Another result of this increase in our 
ranks is that we're getting more and 
more calls from software and hardware 
manufacturers seeking entry into this 
burgeoning market. Often, the question 
is, "Will it run on the 1000?" or the 2000 
or the 100 or the 3000 or the 600. We're 
willing to make these tests for them. It 
is to their advantage, ours and, natu- 
rally, yours. The larger the software and 
hardware base, the more useful your 
Tandy MS-DOS or portable is. 

What is the most interesting of all is 
the willingness of many manufacturers 
to make modifications to their pro- 
grams, if necessary, to "get into the 
Tandy market." That contrasts sharply 
with the don't-bother-me attitude as 
recently as a year ago from many peo- 
ple. 

Yes, these are exciting times for us all 
— for you, as a user — for me, as a 
publisher and enthusiastic supporter of 
this market. And, of course, for the 
people at Tandy Center as well. 

We'd like to keep on increasing the 
size and usefulness of PCM and you can 
help us. When you call or write for 
information or to place an order with 
one of our advertisers, please mention 
that you "saw it in PCM." I know that 
is a trite expression — but you would 
be very surprised at how much good it 
can do. And for those from whom you 
buy things that don't advertise here, 
please let them know you read PCM. 
After all, you are supporting them by 
buying their products — ask them to 
support your market by being involved 
in it. You'd be surprised how much that 
helps, too. 

We have something really exciting 
happening here. Let's keep it going! 
After all, it is in all of our interests. 


— Lonnie Falk 





Also from the publishers of PCM... 


RAINBOW 


TOP SIMUL 

Explore the Arctic EAA 

Pursue Hearl-stirring Action 

Four Great Hardware Projects! 
ΕΞ 


Our Third Annual 
Adventure Contest 


The 





THE COLOR COMPUT ER MONTI HLY MAGAZINE 


The Rainbow is the most comprehen- 
sive publication a happy CoCo ever had. 
It's the #1 authority for detailed informa- 
tion on the Color Computer. 





The latest news on the Color Computer grapevine is that 
more and more people are discovering The Rainbow.® 





Now in its fifth year, The Rainbow has authors and innovators as Bob Albrecht and 


become the standard by which other Color 
Computer magazines are compared. And no 
wonder! The Rainbow towers above the 
crowd, now offering up to 300 pages each 
month, including as many as two dozen 
type-in-and-run program listings, a host of 
articles and in excess of 20 hardware and 
software product reviews. 

We lead the pack in Color Computer 
publications and are devoted exclusively to 
the Tandy Color Computer. We made our 
climb to the top by continually offering the 
best and the most by such well-known 


Don Inman, and games from top pro- 
grammers like Robert Tyson, Fred Scerbo 
and. The Rainbow offers the most in enter- 
tainment and education, home uses, tech- 
nical details and hardware projects, tutor- 
ials, utilities, graphics and special features 
like Rainbow Scoreboard and our CoCo 
Clubs section. 

For only $31 a year, you get the keys to 
all the secrets locked in your CoCo! 

Are you searching through the jungle of 
claims and clamor? Climb above it all. Look 
up. Find The Rainbow. 


THE RAINBOW 
The Falsoft Building 
P.O. Box 385 
Prospect, KY 40059 


YES! Sign me up for a year (12 issues) of THE RAINBOW. 








ΠΕΝ ΤΗΕ RAINBOW 
Address (502) 228-4492 


Oc nari PN ces ee ET P. Subscriptions to the RAINBOW are 
$31 a year in the United States. Can- 
adian rate U.S. $38. Surface rate to 
other countries U.S. $68; air rate U.S. 
$103. All subscriptions begin with 
the current issue. Please allow up to 
5 to 6 weeks for first copy. Kentucky 
residents please add 5% sales tax. 
U.S. currency only, please. 


Payment Enclosed O 


Charge Visa O MasterCard O American Express O 


My Account st 


Signature 
Prices subject to change. 
Card Expiration Date 


In order to hold down non-editorial costs, we do not bill. 





MEI Letters to PCM 


Problems in the ‘Print Shop’ 


Editor: 

I recently purchased the program Print 
Shop, by Broderbund Software, to run on 
my Tandy 1000. I have an Epson MX-80 
printer with Graftrac Plus. My problem is 
that I can’t print the graphics I create. The 
problem allows me to either print the printer 
test or print the first graphics created, then 
if I try to print a second time it tells me the 
printer is not ready. I called Broderbund and 
the person I talked with said they had other 
complaints from people who had a Tandy 
1000 and an Epson printer. The only sugges- 
tion she could give me was to turn off the 
computer after each printout and start over 
again. 

There has to be a better way. I also have 
the program Print Master, by Unison World 
Inc., and that program works fine although 
I would like to hear from anyone who has 
been able to move Print Master to hard disk 
successfully. I understand there is a utility 
that will do this, but I have not been able 
to find it. 

I would appreciate hearing from anyone 
who has found the fix for the Print Shop 
problem or anyone who knows how to move 
Print Master to hard disk. 

Larry E. lerley 
Elizabethtown, PA 


Editor: 

I just finished reading an article in your 
February 1986 copy of PCM entitled “Up- 
grade Your Tandy 1000," by Brian Alsop. In 
the article Mr. Alsop states that he used a 
PBJ MFB-1000 to upgrade his Tandy 1000. 
I, too, have the PBJ MFB-1000 installed in 
my Tandy 1000 along with a 300 Baud 
Modem Board, Cat. No. 25-1003. In his 
statement about the drawbacks to the PBJ 
concerting the COM1 and COM2 ports, he says 
you have to option your other communica- 
tion expansion boards to COM2 and use the 
MFB as COM1 only. However, you can 
option the PBJ board as COM2, as the user's 
manual shows on Page 5, Section 4 of the 
MFB-1000 user's manual. It shows you how 
to reconfigure the MFB to COM2 by moving 
two jumpers, or plugs, on the board. The 
first plug is labeled COM1/COM2 and is 
located near U23, to the left of center of the 
board, and the next plug is labeled E1/E2, 
and is located immediately to the left of the 
edge connector. All of this information is 
detailed on pages 5 and 6 of the user's 
manual. 

I have been using my MFB with 512K and 
have had no trouble with the operation of 
the board or my system. I recommend this 
board to anyone who is thinking of expand- 
ing their system. 

David Baker 
Essex, MD 
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Editor's Note: There is no mention in 
the owner's manual of the MFB-1000 
board we received for review of a way 
to configure the board as COM2. We 
did, however, receive a number of 
letters informing us otherwise. 


A Word about Word 


Editor: 

On Page 49 of the Microsoft Press pub- 
lication, Word, by Janet Rampa, is a caption 
titled "Scrolling Sideways." With my T2K, 
which doesn't have a key labeled scroll lock, 
the technique of scrolling sideways won't 
work or doesn't work for its operator. 

Does this mean either Word a la IBM is 
greater than Word a la T2K, or one is 
greater, capability wise, than the other 
regardless of whichever IBM model — PC, 
PCjr, XT or AT — is being compared? 

Also, is there a print wheel available for 
Tandy's DWP-210 that has the symbol used 
in the lawyer world to denote a section? 

H.E. Lamb 
Camp Hill, PA 


Reply from Tandy Corporation 
Dear Mr. Lamb: 

I'm writing in response to your January 
16 letter to PCM magazine. 

When using the Microsoft Word program 
on the Tandy 2000, sideways scrolling can 
be achieved by using the corresponding left- 
or right-arrow keys. Text must be formatted 
wider than the display screen for the side- 
ways scrolling to occur. 

Our in-house software experts tell me that 
Tandy's Word program, Version 1.0, is 
comparable to Microsoft's Word Version 
1.0. Microsoft has come out with more 
recent versions of the program with addi- 
tional capabilities. 

We do not carry a daisy wheel for the 
DWP-210 printer that has the symbol used 
by lawyers to denote a section. 

I hope this answers your questions. Please 
let me know if you need more information. 

Amy Arutt 

Assistant Manager 
Marketing Information 
Tandy Corporation 

Ft. Worth, TX 


Tandy 1000 Lover 


Editor: 

I am a very happy owner of a Tandy 1000 
computer with a Tandy CM-4 color monitor 
and an Epson RX-80 printer. The Tandy 
1000 computer has better graphics than any 
other computer [I've seen]. I love the graph- 
ics mode of 320 by 200 in 16 colors (Screen 
5) very much because I can draw pictures in 
16 colors instead of two or four colors as on 


any other computer. I can use the 


PRINT(X,Y) ,R$,C command to paint the 
pictures in 256 colors. 

Ilove the Microsoft BASIC that comes with 
the computer: It is more powerful than 
BASICs on any other computers because it 
has more BASIC commands. The BASIC 
commands for graphics are more powerful, 
beating the Extended Color BASIC in the 
Radio Shack Color Computer. After playing 
with the Radio Shack Model 1 computer, 
Radio Shack Color Computer, Atari 
1200XL computer and Commodore 64 
computer, I fell in love with my Tandy 1000 
because it is the most powerful computer I 
have owned. Too bad the Tandy 1000 com- 
puter does not have sprites like the Commo- 
dore 64 and 128 computers have, but I can 
simulate sprites with GET(X1,Y1)- 
(X2, Y2) ,8€ and PUT(X,Y),A%,XOR com- 
mands. 

My mother bought me the Tandy 1000 
computer with one disk drive and 128K 
RAM. I would like to add more memory, 
a clock/calendar and serial ports to my 
computer. I could buy three expansion 
boards from Radio Shack, wasting $440, or 
buy one board with these options cheaper 
from another company. I am not sure which 
expansion board to buy. Please tell me which 
board to buy. I need a second disk drive so 
I don't have to change disks all the time 
when copying programs from one disk to 
another. I will buy the disk drive from Radio 
Shack. Should I have Radio Shack install 
the disk drive? Is it too hard to install the 
disk drive myself? I can squeeze 12K or 14K 
out of my computer by moving the text 
screen to the top of memory and using 
CLERR ,,,XXXX to get more memory. I 
found this from 80 Micro magazine. Here is 
the program that does this: 

10 SCREEN 0,1,0,0 

20 WIDTH 40 

30 SCREEN @,1,7,7 

40 CLERR ,,,2048 


10 SCREEN 0,1,0,0 

20 WIDTH 80 

30 SCREEN 0,1,3,3 

40 CLEAR ,,,4096 
Jeffrey Morris 
Rochester, NY 


Editor's Note: There are at least two 
manufacturers of multifunction 
boards for the Tandy 1000: PBJ's 
MFB-1000 and Hard Drive Special- 
ist's Tan Pak. In addition to these two, 
Tandy now sells the Memory Plus 
expansion board which can expand 
your machine to 640K and allows you 
to choose a clock calendar | mouse or 
RS-232 port option. 

It is not difficult to install a second 
floppy disk drive in your computer 
yourself. We do recommend, how- 
ever, that you purchase your disk 
drive from a company that advertises 
support for the Tandy 1000 — the 
instructions should be easier to follow 
for your machine. 


DISK POWER 


AT LAST !! 


ULTRACHARGE YOUR TANDY PORTABLE DISK DRIVE WITH 
DISK POWER 100/200 


* A REAL DISK OPERATING SYSTEM 

All disk functions completely supported by DISK POWER. 
No need to rely on FLOPPY.CO or user-written programs for 
external utilities. DISK POWER is not just another disk 
manager program, it is the full featured DOS that the MODEL 
100 should have had from the very beginning! 


* DISK ACCESSIBLE FROM BASIC & TEXT 


Data file Ι/Ο operations supported with familiar BASIC com- 
mands. Save and Load programs from within BASIC. From 
TEXT, every .DO file can be Loaded from or Saved to Disk 
by DISK POWER. 


* TELCOM ENHANCEMENTS 

Direct Access to Basic & TEXT from inside TELCOM. Kill, 
Load, Save or Edit files without losing telephone communi- 
cations. You can see your files while uploading. With 
DISK POWER, it is all possible! 


* FULLY MENU DRIVEN QUE ED 
Any DISK or RAM file is selected by the cursor. The stroke .. j 
of a SINGLE function key will perform the desired task on ` 
the HIGHLIGHTED file. You may never have to remember i 
or even type a filename again, when using DISK POWER! ` 


* NOT JUST “FOR HACKERS ONLY” 
Though programmers will be surprised by the versatility of i 
DISK POWER, regular users will find our operating cem Es 
FAST, easy to use AND easy to understand. eur 


* WRITTEN BY HUGO FERREYRA (SoftPower) pi 
In DISK POWER, you can expect to find the same ULTRA- . 
features, innovation & ease of use that all users & reviewers - 
found in TEXT POWER 100, which made it “THE BEST ` 
FORMATTER THERE IS FOR ΤΗΕ 100”. m 


* 24 HR/DAY BBS TECHNICAL INFORMATION & SUPPORT HOTLINE: 
Use STAT M8N1E, and Log-on with ID: DISK using PASSWORD: POWER. 


(514) 457-201 d 


DISK POWER 100/200 $49.95 US TEXT POWER 100 $49.95 US 
or SAVE by buying the ULTRA POWER program pack: DISK POWER/TEXT POWER 100 FOR ONLY $89.95 us 


To order TEXT POWER 100, specify printer(s) used. The basic price includes support for one printer. Please add $10.00 for each additional printer you 
wish supported. All U.S. orders shipped from within the USA. Absolutely no custom forms, sales tax or duty required. Add $3.00 S&H to each order. 


USA (Except N.Y.) 1-800-448-4511 Ext. 313 
NEW YORK STATE ONLY . 1-800-962-1380 Ext. 313 
ONTARIO & QUEBEC 1-800-255-1133 Ext. 313 


No surcharge for VISA or MC 
To order, call TOLL FREE: 


or send CHECK or MONEY ORDER to: 
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£y Robert C. Mille 


isguised as a game; this enter,” 
taining math tutor grows: ΜΑΤΙ 
the skill of the player. When 


saving the galaxy becomes tao easy or.. 


too difficult to be fun anymore, simply 
raise or lower the difficulty level. Let’s 
face it, an educational program that is 
too easy or too hard just doesn't teach 





D. 


for this game allows anyone (even the 


player) to set the game's level of diffi- . 
_ culty. ; 


The player is the pitot of an advanced 


space shuttle with the missior of saving =: 


¿he Galaxy from the’ evil, invaders. By: 
entering the correct answer to addition 
or subtraction probléms, the pilot's 


x ‘lasers drain all the energy from the 


ee “enemy shuttle. If the pilot enters an 


incorrect answer, the enemy drains 





Bob - Mills is a master sergeant in the 
United States Air Force stationed at the 
Armed Forces Institute of Pathology in 
Washington, D.C. He is the course 
supervisor of the Tri-Service School of 
Histopathology and has written numer- 
ous laboratory utility and educational 
grams for several 





i. one of the shuttle’s shields. When 
all three shields are gone the shuttle is 


vaporized. To save the Galaxy, the pilot 


. must drain the énergy from five enemy 
“shuttles in each of five difficulty levels. 


The-first program, Configure Math 
War, creates or changes the data file, 
which contains the maximum values 
that can be generated by the game’s 
random number generator. In Line 120 
an attempt is made to read an existing 
filé;. if the file does -not exist one is 


.. Written to the disk later. After an in- 


struction display, the existing values are 
displayed (lines 250-330) and the user is 


allowed to accept or change-these 


values, Note that one subroutine is used 
(lines 850 and: 860) to control all of the 
user friéndly one-key selections. If the 
user decides. to Change the values, a flag 
is set (Line 360) to force the program to 
save the changes on the disk. * 
Random access data files can only 
store string values, but the program 
requires integers to operate; LSET, ΚΙ 
and CVI commands are used to make 
the conversions (see lines 910 and 980). 
The subroutine at lines 950-1010 write 
the data to the di he CONF IG.WAR 
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run Galactic Math War or exit to 
system. 

The second program, Galactic Math 
War, uses the power of Tandy 1000 
BASIC graphics and audio commands to 
create a pleasing audio/visual display. 
Memory is cleared to 32768 in Line 100 
to allow for use of SCREEN S. Because 
the use of some colors on a mono- 
chrome monitor causes an unpleasant 
faded look, all colors except black and 
gray are set to white in lines 170-200 (if 
color is set to ‘N’ during configuration). 

To speed things up a bit, GET^Graph- 
ics is used to store the enemy shuttle 


2g '* 
34 UN 
40 '* 
5g '* 
69 '* 
7g '* 


and laser explosion pictures in memory 
arrays. In lines 1200 and 1240, GET 
stores the figures and in lines 270, 300, 
430, 540 and 590 PUT^Graphics 
quickly places the images on the screen. 
In lines 140-160, the program checks the 
value of R(1) and COLSEL $ to be sure 
the program has been configured. In 
lines 1010-1110, the random numbers 
are generated and the correct answer is 
calculated. Note the use of the SWAP 
statement to ensure positive answers to 
subtraction problems. 

This unique tutor should serve you 
well. I have included a few extra REM ( ^) 


GALACTIC MATH WAR 
A MATH TUTOR GAME FOR THE TANDY 1999 
ROBERT C. MILLS 
39g HEATHER RIDGE DRIVE 
FREDERICK, MD. 21791 


(391) 695-5228 


statements in brackets to make follow- 
ing the programs a little easier. You 
don't have to type in the extra state- 
ments (unless you just like to type). If 
you don't care to type at all, I will be 
glad to send you the finished programs 
on a 54-inch disk for $5 to cover the 
cost of the disk and postage. I will be 
happy to answer any questions you may 
have and would like to hear your com- 
ments. My address is 300 Heather Ridge 
Dr., Frederick, MD 21701; phone (301) 
695-5228. D 


x 
* 


* 
x 


89 1 Jeyesededesetetetetetefefetefesedfeyeyedjejededetedeyesetetetejesedjedjejedetededesesedejeyeyedesedededeseyeyejedeyeyedededeyeyedeve 


99 ' ### INITIALIZE ### 


19g KEY OFF:CLEAR,,,32768!:SCREEN 5,1:DEFINT A-Z:SHIELD-3 
11g RANDOMIZE VAL(RIGHT$(TIME$,2)) 


129 DIM A$(5),B$(5),A(5),B(5),C(16) 


139 GOSUB 929 ' 


149 ' ### ERROR TRAP TO CHECK FOR DATA FILE ### 


159 IF A(1)«1 THEN 1369 


169 IF COLSEL$"Y" AND GOLSEL$"N" THEN 1369 

179 ' ### SET COLORS ON VALUE Y OR N FROM DATA FILE 444 
189 IF COLSEL$-"Y" THEN 199 ELSE 299 

199 FOR X=9 TO 15:C(X)-X:NEXT X:GOTO 219 

299 FOR X=1 TO 15:C(X)-15:NEXT X:C()-0:C(11)-7 


219 '### INTRODUCTION PAGE AND PUT GRAPHICS IN MEMORY ### 


229 ON ERROR GOTO Ø ' 
239 GOSUB 1129 


[INACTIVATE ERROR TRAP ROUTINE] 
' [DRAW AND STORE SPACE SHUTTLE] 


249 SOUND ON: PLAY"MBV1204CG2G4F8E8D805C404G2" 


259 COLOR 15,9 


269 LOCATE 19,9:PRINT"GALACTIC MATH WAR" 


279 PUT (199,199),S 


280 LOCATE 19,13:PRINT"by: BOB MILLS" 


| 29g PRINT: PRINT" 


PRESS ANY KEY » " 


| 398 AS-INKEYS:PUT (199,199),S:IF A$-"" THEN 399 
31g ' ### USER SELECTS ADDITION OR SUBTRACTION ### 
| 329 CLS:LOCATE 19,5:PRINT" CHOOSE YOUR LASER STYLE: " 


| 33g LOCATE 12,19:PRINT"l = ADD 


. 3498 AS=INKEYS$:IF A$-"" THEN 349 
359 IF A$-"1" THEN OP$-"add":LET SG$="+":GOTO 399 
. 369 IF A$-"2" THEN OP$-"sub":LET SG$-"-":GOTO 399 


. 379 BEEP:GOTO 320 


389 ' ### START OF LOOP FOR THE 5 GAME LEVELS ### 


399 FOR L-l TO 5 


Ago ' ### START OF LOOP FOR THE 5 ENEMY SHUTTLES ### 
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419 FOR ENEMY = 5 TO 1 STEP -1 


Listing 1: 
1 HV IH INI AIH IA IIIA IIIA III III III INITIO III I III IIR IAI AI IAI AIAN. 


'[SEED NUMBER GENERATOR] 


[GO GET VALUES FROM THE DATA FILE FOR RANDOM *s] 


*":LOCATE 14,19:PRINT"2 = SUBTRACT -" 


HARD DRIVE PRICE BREAKTHROUGH 


STARTING AT $299.95! 


5 to 60 megabytes complete easy to install internal and external systems 
— will boot just like an XT — fully warranteed — 
same day shipping from stock — fast service — free technical assistance 
REMOVABLE CARTRIDGE NOW AVAILABLE 
$499.95 to $999.95 
STREAMING OR FLOPPY TAPE BACK UP SYSTEMS 


. complete internal and external systems 


$1,795.00 — TURBO M — DUAL SPEED 


20 megabytes — one floppy — 640K — clock calendar — serial port — parallel port 
monochrome card — monochrome monitor with tilt and swivel base 
Keytronics 5151 style keyboard — one year warranty — shipped from stock 


MEGADISK™ HARD DISK DRIVE SYSTEMS TOLL FREE ORDERING 1-800-343-8841 
For the { IBM/PC, Tandy 1000, TRS/80 Models I/III/IV/4P, Compaq, PC Workalikes, Color Computers, Heath/Zenith, Max/80 


Complete with Hardware, Cables, Software and Quikfit Installation 
5 Megabytes Internal Mount Ar sU S EEA EA A rece I EN 2 ο k sve set Me acini RR] S starting at $ 239.95 
10 Megabytes Internal Mount ................ 
20 Megabytes Internal Μουπι................... 
5 Megabytes External System 


20 Megabytes External System 1 K . IGC starting at 
Tape Backup System — Internal Or External starting at 
aun, f IBM/Heath — DOS, 1.0, 2.0, 2.1, 3.0, or later 
DOS Systems Available: 4 TRS/80-LDOS, TRSDOS 6x, Newdos/80, Dosplus, CP/M, COCO DOS, Max/80 LDOS, 059 


FULLY WARRANTIED — PARTS AND LABOR — 24 HOUR SERVICE — CALL TOLL FREE — 1-800-343-8841 


IBM ENHANCEMENT CARDS 

Multifunction with 384K Color graphics 

Serial port, parallel port Monochrome/RGB Color 

Clock calendar, game port Disk controller with cable — up to 4 drives 
Serial port q 384K memory 
Monochrome only É Hard drive controller 
Monochrome graphics w/parallel port A Keytronics 5151 style keyboard 

Network card 249.95 


DEALER INQUIRIES INVITED PRICES CHANGE EVERY DAY 
CALL 1-617-872-9090 CALL 1-800-343-8841 


is SOFTWARE SUPPORT, INC. 


1 Edgell Road, Framingham, MA 01701 (617) 872-9090 Telex-383425 
Hours: Mon. thru Fri. 9:30 am to 5:30 pm (Ε.57Τ') Sat. 10 am to 3:30 pm 
SERVICE POLICY — Our Professional Technical Staff Is Available To Assist You Monday Through Saturday. 
WARRANTIES — Up To One Full Year Parts And Labor. Floppy Disk Drive Power Supplies — Five (5) Years. 
SERVICE — 24 Hour Turn-A-Round On All In-Stock Parts. Dealer Inquiries Invited. Call 617-872-9090 


pex Cal For Shii "Toll Free 1-800-343-8841 erosoen 


κ H q 2. ^ Prices and Specifications May Change 
Cash Discounted Prices Please Call For Our Latest Price Saving Specials. Without Notice. 















429 GOSUB 1269 . ' [DRAW COCKPIT] 

439 PUT (129,39),S 

449 GOSUB 19909  ' [GO GET RANDOM NUMBERS AND ANSWER TO PROBLEM] 
450 LOCATE 19,13:PRINT N1:LOCATE 19,19:PRINT N2 

469 LINE (98,135)-(128,169),C(2),B:LINE (148,135)-(178,169) ,C(2), B 
479 LOCATE 19,5:PRINT SHIELD; 

489 LOCATE 2,3:PRINT"LEVEL-";L;" ENEMY SHIPS="; ENEMY; 
499 LOCATE 19,28: INPUT "",G ^' [GET USER'S ANSWER] 

500 IF G-CORRECT THEN 529 ELSE 579 ' [CHECK USER'S ANSWER] 

519 ' ### CORRECT ANSWER ENTERED ### 

529 SHIELD=SHIELD +1 | 

530 LINE (5,119)-(169,59),C(14):LINE (314,119)-(169,505,C(14) 
549 PUT (129,39),H:NOISE 4,12,18:PLAY"MFMSO5V19C8F8CB" 

559 FOR Z=1 TO 599:NEXT Z 

569 GOTO 659 

579 '### INCORRECT ANSWER ENTERED ### 

589 LINE (5,119)-(69, 49) ,C(14): LINE (314,119) -\(69,49) , C(14) 

599 PUT (29,28) ,H 

699 PLAY"MFO1V19FB" 

619 FOR 2-1 TO 599:NEXT Z 

629 COLOR C(2),C(4):NOISE 5,15,19:FOR 2-1 TO 199:NEXT Z:COLOR 15,9 
639 SHIELD-SHIELD-1:IF SHIELD=9 THEN 829 .' [CHECK IF GAME OVER] 
649 GOTO 429 

659 NEXT ENEMY 

669 IF L=5 THEN 7290 ' [CHECK IF GAME HAS BEEN WON] 

67% CLS: LOCATE 12,15:PRINT" NEW LEVEL." 

689 FOR Z-1 TO 259:NEXT Z 

699 PLAY"MFV1904C2G4F8E8D805C404G2" 

799 NEXT L 

719 ' ### WON THE GAME ### 

729 CLS 

739 LOCATE 12,2:PRINT" YOU HAVE SAVED THE GALAXY " 

748 COLOR 15,9:BEEP:COLOR C(4), C(2):BEEP:COLOR 15,9:BEEP:COLOR C(4), C(2) 
750 PLAY"MFV1504C2G4F8E8D8050404G2C2G2F8E8D805C404G2F2D2C2" 

769 IF COLSEL$-"Y" THEN COLOR C(4),0(2) ELSE COLOR 15,9 

770 LOCATE 16,5:PRINT"PLAY AGAIN ? Y OR N" 

789 AS=INKEY$;IF A$-"" THEN 788 

799 IF AS="y" OR A$-"Y" THEN 19 

899 IF A$="n" OR A$-"N" THEN SYSTEM 

819 BEEP:GOTO 779 

829 ' #### SHIELDS GONE - LOST THE GAME #### 

839 CLS;IF COLSEL$-"Y" THEN COLOR C(4),C(2) ELSE COLOR 15,9 

849 LOCATE 12,5:PRINT"YOU HAVE BEEN VAPORIZED !" 

859 PLAY"MFV1501F2FAF16FA4G-M4GBGBFBFBEBFA" 

869 LOCATE 16,5:PRINT"PLAY AGAIN ? Y or N " 

879 AS=INKEY$:IF A$-"" THEN 879 

889 IF A$-"y" OR AS="Y" THEN 19 

899 IF A$="n" OR A$-"N" THEN SYSTEM 

99g BEEP:GOTO 869 

910 ' AAAHHH AE TRH EH EE E 

920 ' ### READ THE FILE CONFIG.WAR ### 

939 OPEN "R",1,"CONFIG.WAR"”, 35 

949 FIELD 1, 3 AS A$(1), 3 AS B$(1), 3 AS ΑΦ(2), 3 AS B$(2), 3 AS A$(3), 3 AS BS 
(3), 3 AS A$(4), 3 AS B$(4), 3 AS A$(5), 3 AS B$(5), 1 AS COTOGS$ 
959 GET 1 

969 FOR X = 1 TO 5:A(X)=CVI(A$(X)):BC(X)=CVI(BS(X)) i NEXT X 

979 COLSEL$=COTOGS 

989 CLOSE 1 

999 RETURN 
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199% ‘### NUMBER GENERATOR ### 

1919 RN-A(CL) 

1929 LN=B(L) ' [SELECT LEVEL OF DIFFICULTY FOR RANDOM NUMBERS] 

1939 NI-INT(RND(l1)*RN) 

1849 N2-INT(RND(1)*LN) 

1956 ' ### CALCULATE CORRECT ANSWER ADDITION ### 

1969 IF OP$-"add" THEN CORRECT = N1+N2:RETURN 

1979 ' ### CALCULATE CORRECT ANSWER SUBTRACTION ### 

198g ' s AND SWAP TO INSURE POSITIVE ANSWER ### 

1990 IF N1<N2 THEN SWAP NL, N2 

1100 CORRECT=N1-N2 

1119 RETURN 

1120 ' ### DRAW SPACE SHIP ### 

1139 DIM S(899) 

1140 SCREEN 5,1 

1159 LINE (5,29)-(79,29),C(1):LINE (79,29)-(7],9), CC1) :LINE (72,9)-(68,19) , CCL) 

1169 LINE: (69,19)-(15,19),C(1):LINE (15,195)-(8,18),C(1):LINE (g,18)-(5,29),C(1) : 

LINE (5,29)-(79,2]),C(1) 

1179 LINE (25,15)-(69,33),C(1):LINE (60,33)-(55,15), CI) LINE (7,15)-(22,15),C(1 
):LINE (29,15)-(28,19),0(1) 

1189 PAINT (25,18),C(11),C(1):PAINT (59,25),C(11),C(1) 

1199: LINE (36,29)-(56,29) , C(11) : PAINT(17,12),0(14) , 0 (1) 

1299 GET(2,2)-(72, 49), 8 

1219 ' ### LASER EXPLOSION ### 

1229 DIM H(899):SCREEN 5,1 

1239 CIRCLE (35,295,28,C(12):PAINT (35,29),C(4),0(12) 

1249 GET (8,9)-(72,49),H 

1250 RETURN 

1269 ' ### DRAW COCKPIT ### 

1279 SCREEN 5,1:CLS 

1289 LINE (8,2)-(319,199),C(9),B:LINE (5,5)-(314,194) ,0(95), B 

1299 LINE (9,119)-(319,119) ,C(9) : LINE (8,115)-(319,1155,C(9) 

1399 CIRCLE (5,119),3,C(14):CIRCLE (314,119),3,C(14) 

1310 CIRCLE (48,159),18,C(9) : LOCATE 23,4:PRINT"SHIELDS":LOCATE 22,27:PRINT"FIRE! 
1324 LINE (98,135)-(128,169),C(9),B: LINE (148,135)-(178,169), (9), B 

1339 LOCATE 19,18:PRINT SG$;:LOCATE 19,24:PRINT"-"; 

1346 LINE (298,135)-(248,169),C(9),B:RETURN 

1359 ' ### ERROR TRAP IF DATA FILE IS NOT FOUND ### 

1369 BEEP:CLS 

1379 SCREEN @:WIDTH 89 

1389 LOCATE 19,5:PRINT"The CONFIG.WAR data file is not on this disk !" 

1399 PRINT:PRINT"USE The configuration program to create the file; then run this 
game." 

1499 PRINT"THIS PROGRAM TERMINATED !";END 

1419 ' s LAST LINE OF MATH WAR PROGRAM ### 
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Listing 2: 


Y ἠγὐςὙς ὃς Ἶς Ἂς ς ὃς Ἄς eye ge gee Jee ge gee ge Je e Je Je ge Jee Je gede Te ge ele ge Tee Ὑς ὃς ς Jee de e Joye ge ge σε Jee gee ge Je gee gede ICICI. 


29 '* CONFIGURE MATH WAR * 
3g '* A COMPLIMENT PROGRAM TO GALACTIC MATH WAR * 
4g tx ROBERT C. MILLS * 
5g 1% 399 HEATHER RIDGE DRIVE * 
6g '* FREDERICK, MD. 21791 ve 
19 '* (391) 695-5228 * 


86 '*eeteleteieteteieteteietejedekejeieketedejejeieteketeteletekeietejetejedetejetetejetejefelejetetejeteteiesejesetejeseteieteteke 

99 ' ### INITIALIZE. ### 

199 KEY OFF:SCREEN 9: WIDTH 89:DEFINT A-Z:FLAG=9 

119 DIM A$(5),B$(5),A(5),BC5) 

129 GOSUB 879 ^' [READ DATA FILE IF IT EXISTS] 

139 ' #### INSTRUCTION PAGE ### 

149 CLS:LOCATE 5,19:PRINT" GALACTIC MATH WAR CONFIGURATION PROGRAM ":PRINT 

159 PRINT" This portion of GALACTIC MATH WAR lets you configure the program for" 
169 PRINT" your color or monochrome monitor and allows you to change the difficu 
lty":PRINT" of the problems generated by the program in each of the five game" 
179 PRINT" levels. You may select values in the range of 1 - 99." 

180 PRINT" Please note that each game level (1-5) has an A and a B value." 

199 PRINT" This feature allows you more flexability in designing a difficulty " 
299 PRINT" level." 

216 PRINT" The A and B values represent the maximum value that the game will" 
220 PRINT" generate for each question in the problems. RCM85": PRINT: PR 
INT: PRINT"Press A to Abort or any other key to Begin. " 

239 AS-INKEYS:IF A$-"" THEN 239 

249 IF A$-"A" OR A$-"a" THEN 699 

250 '#### SHOW VALUES THAT ARE PRESET ### 

266 CLS:LOCATE 5,5:PRINT" COLOR MONITOR Y or N IS NOW SET AT: ";COLSELS 

279 LOCATE 7,5:PRINT" GAME LEVEL VALUE A VALUE B" 

289 FOR X-1 TO 5:PRINT TAB(9) X TAB(26) A(X) TAB(47) B(X):PRINT:NEXT X 

299 PRINT'"*evex*" 

309 GOSUB 856 

319 IF A$="A" OR A$="a" THEN 699 

326 IF A$="C" OR A$-"c" THEN 359 

339 BEEP:GOTO 299 

349 's CHANGE MONITOR ### 

350 CLS:LOCATE 12,5:PRINT" COLOR MONITOR Y or N IS NOW SET AT: ";COLSEL$ 

369 FLAG-1 ' [SET FLAG SO PROGRAM WILL SAVE CHANGES] 

370 GOSUB 859 

389 IF A$-"A" OR A$-"a" THEN 439 

399 IF AS="C" OR A$-"c" THEN 419 

49g BEEP:GOTO 359 

419 IF COLSEL$-"Y" THEN COLSELS$-"N":GOTO 359 

429 COLSEL$="Y": GOTO 356 

439 ' #### SELECT NEW VALUES FOR EACH LEVEL ### 

449 FOR I=1 TO 5 

459 CLS:LOCATE 12,5:PRINT" VALUES FOR GAME LEVEL ";L;" ARE SET AT:" 

460 LOCATE 14,19:PRINT" VALUE A = ";A(L) 

470 LOCATE 16,19:PRINT" VALUE B = ";B(L) 

489 GOSUB 859 

499 IF AS="A" OR A$="a" THEN 589 

500 IF AS="C" OR A$-"c" THEN 528 

519 BEEP:GOTO 489 

529 CLS: LOCATE 19,30:PRINT"ENTER NEW VALUES FOR GAME LEVEL ";L 
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539 LOCATE 12,28: INPUT" VALUE A = ";NVA 
549 IF NVA<1 OR NVA>99 THEN BEEP:GOTO 529 
559 LOCATE 14,29:INPUT"VALUE B — ";NVB 
569 IF NVB<L OR NVB>99 THEN BEEP:GOTO 559 
570 A(L)-NVA: B(L) -NVB 
589 NEXT L 
599 '#### SHOW VALUES THAT ARE PRESET ### 
699 CLS:LOCATE 5,5:PRINT" COLOR MONITOR Y or N IS NOW SET AT: ";COLSELS 
619 LOCATE 7,5;PRINT" GAME LEVEL VALUE A VALUE. B" 
629 FOR X=1 TO 5:PRINT TAB(9) X TAB(26) A(X) TAB(47) B(X):PRINT:NEXT X 
639 ΡΕΙΝΤ"ΑΑΑΗ 
GOSUB 859 
IF A$-"A" OR A$-"a" THEN 699 
IF A$="C" OR A$-"c" THEN 359 
BEEP:GOTO. 639 
' ### VALUES ACCEPTED ### 
IF FLAG — 1 THEN 799 ELSE 749 
g CLS: LOCATE 12,35; PRINT"SAVING CHANGES:" 
719 GOSUB 959g 
729 CLS 
739 '### END THIS SEGMENT ### 
749. CLS:LOCATE 19,5:PRINT"GALACTIC MATH WAR CONFIGURATION COMPLETE :" 
759 LOCATE 12,15:PRINT" Press R to restart configuration." 
769 LOCATE 14,15:PRINT" Press G to start the game." 
779 LOCATE 16,15:PRINT" Press 5 to go to MS-DOS system." 
789 LOCATE 29,15:PRINT" SELECT > 3; 
790 AS-INKEYS:IF A$2'"" THEN 799 
89g IF AS="R" OR A$-"r" THEN 139 
819 IF A$-"G" OR A$-"g" THEN RUN "MATHWAR" 
829 IF A$="S" OR A$e"Ss'" THEN SYSTEM 
839 BEEP: GOTO 789 
849 ' ### ACCEPT OR CHANGE ### 
859 LOCATE 29,5:PRINT" PRESS Α to ACCEPT these values or 6 to CHANGE.":LOCATE 
29,3 
869 AS=INKEY$:IF A$-"" THEN 866 ELSE RETURN 
879 ' #### READ THE FILE CONFIG.WAR ### 
889 OPEN "R",1,"CONFIG.WAR";35 
899 FIELD 1, 3 AS ΑΦ(1}, 3 AS B$(1), 3 AS ΑΦ(2), 3 AS B$(2), 3 AS A$(3), 3 AS BS 
(3), 3 Α5 ΑΡ(4), 3 AS B$(4), 3 AS A$(5), 3. AS B$(5), l AS COTOGS 
999 GET 1 
910 FOR X = 1 TO 5:A(X)-CVI(AS(X)):B(X)-CVI(BS(X)):NEXT X 
929 COLSEL$=COTOG$ 
939 CLOSE 1 
949 RETURN 
959 ' #### WRITE THE FILE CONFIG. WAR 484 
969 OPEN "R" L "CONFIG. WAR", 35 
979 FIELD 1, 3 AS A$(1), 3 AS B$(1), 3 AS A$(2), 3 AS B9(2), 3 AS AS(3),; 3 AS BS 
(3), 3.AS A$(4), 3 AS B$(4), 3 AS A$(5), 3 AS B$(5), 1 AS COTOGS 
989 FOR X-l TO 5:LSET AS(X)-MKIS(A(X)):LSET BS$(X)-MKIS(B(X)):NEXT X 
999 LSET COTOGS-COLSEL$ 
199g PUT l1:CLOSE 1 
1010 RETURN 
1929 ' ### LAST LINE OF THIS PROGRAM ### 
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We edged out the competition 
with better solutions for τ 
every application. 





Presenting the Tandy® line of 
PC-compatible computers 
from Radio Shack 


At Radio Shack Computer 
Centers, you won’t find just any 
computer, you'll find the right 
computer for your business. Our 
line of computers based on the 
MS"-DOS operating system lets 
you outfit your office with the 
computing power you need, with- 
out paying for capabilities you 
may never use. And since we carry 
a wide range of software and ac- 
cessories, you can do all of your 
business at one location. So come 
in today and let our trained staff 
help you decide which Tandy com- 
puter is right for your business. 


America's *1 PC compatible 
Looking for a complete, low- 
cost MS-DOS system? Take a 
look at our popular Tandy 1000. 
Because the Tandy 1000 is com- 
patible with the IBM® PC, there 
are thousands of software pro- 
grams for you to choose from. 
But unlike IBM’s PC, every 
Tandy 1000 comes with Desk- 
Mate® software. DeskMate in- 
cludes six applications so you can 
start computing from day one. 


The PC/XT’s “ 


The Tandy 1200 works like an 
IBM PC/XT—but costs much 
less. The 1200 runs the same 
top-name software and supports 
the same hardware as the PC/XT. 
So if you’re already using one or 
more IBM PC's in your office, 
the Tandy 1200 lets you expand 
for less—and continue using the 
same software. 


The graphics advantage 
Searching for a quality com- 
puter with advanced graphics 
capabilities? Take a good look 
at the affordable Tandy 2000. 
The 2000 features high- 
resolution graphics to create 
razor-sharp graphs and diagrams 
in a brilliant array f colors. 





mirror image" 





Combined with computer- 
aided-design software, a Tandy 
2000 gives your company endless 
opportunities for increased crea- 
tivity and productivity. 


The new Tandy 3000 


Introducing a super-powerful 
computer that's the affordable al- 
ternative to the IBM PC/AT. The 
Tandy 3000 has all the power 
you need to manage your busi- 
ness, and it's compatible with 
programs designed for the PC/AT 
and PC/XT. The Tandy 3000 op- 
erates at 8 megahertz, twice the 
speed of the industry standard. It 
comes with 512K of main mem- 
ory and ten expansion slots. And 
with the forthcoming XENIX™ 
operating system, two to six us- 
ers will be able to use the Tandy 
3000 simultaneously, using low- 
cost data terminals. 


In business...for business 

For the best in state-of-the-art 
computers, popular software, 
professional training, support 
and affordable leasing, visit your 
local Radio Shack Computer 
Center today. 


Available at over 1200 
Radio Shack Computer Centers and at 
participating Radio Shack stores and dealers. 


Radie Shaek 


COMPUTER CENTERS 


A DIVISION OF TANDY CORPORATION 
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$ Mail To: Radio Shack, Dept. 86-A-138 
300 One Tandy Center, Fort Worth, TX 76102 
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DeskMate/Re: τ κοκ TM Tandy Corp. ΙΒΜ/ 
Registered TM International Business Machines 
Corp. MS and XENIX/TM Microsoft Corp. 


Εκ τος ο ΩΜΗ 
The Eyes of Texas 


With Wayne Sanders, Curator 






exas, the corporate home of 
| Tandy Corporation, mother of 
our beloved Tandy computers, is 
celebrating its Sesquicentennial this 
year. This month’s featured Gallery 
exhibit runs on a Tandy 1000 and is a 
tribute to the state of Texas. It comes 
to us from Pete Martinez of Tyler, 
Texas. 

If you would like to have your graph- 
ics creation presented here, send it in on 
disk with a letter describing how it 
works. If possible, include instructions 
on how to make your program work on 
each Tandy MS-DOS machine. A win- 
ning gallery exhibit is chosen each 
month and the artist is awarded $50. 
Address your entries to PCM Gallery, 
P.O. Box 385, Prospect, KY 40059. 





The listing: 


1999 CLEAR ,,,32768!:CLS:KEY OFF:SCREEN 5:TS=1.745329E-@2 

1919 LINE (65,84)-(129,84),14:FOR I-1 TO 22:READ X,Y:LINE -(X,Y),14:NEXT I 
1929 DATA 129,15,163,15,163,48,167,48,171,46,173,49,183,52,189,52,192,56,194,54 
1939 DATA 197,54,199,56,202,54,204,56,297,54,213,57,223,53,229,53,239,57,241, 58 
1949 DATA 246,57,248,83 

1050 CIRCLE (245,89),6,14,19*TS,69*TS:CIRCLE (243,19),15,14,339*TS,69*TS 
1969 CIRCLE (253,112),5,14,329*TS,45*TS:LINE (258,115)-(254,119),14 

1070 CIRCLE (257,149),22,14,199*TS,135*TS:LINE (242,125)-(238,127),14 

1989 LINE -(239,134),14:LINE -(229,149),14:LINE -(211,147),14 

1999 CIRCLE (229,169) ,16,14,139*TS,219*TS:LINE (296,168)-(299,179),14 

1199 FOR I-1 TO 41:READ X,Y:LINE -(X,Y),14:NEXT I 

1119 DATA 295,182,292,189,196,178,193,179,187,177,182,174,178,174,173,164 
1129 DATA 172,159,171,156,167,154,164,149,169,145,158,149,152,139,144,124 
1139 DATA 149,121,135,121,128,119,127,121,124,122,122,127,117,133,119,139 
1149 DATA 198,139,197,128,199,124,96,122,94,118,93,112,91,119,91,197,87,194 
1150 DATA 83,193,82,199,81,98,78,97,76,94,73,93,71, 99, 79,88 

1160 CIRCLE (69,84) ,4,14,189*TS,279*TS:LINE (163,48)-(163,148),14 

1179 LINE (163,94)-(256,94),14:PAINT (169,29),1,14:PAINT (164,95),4,14 

1189 PAINT (164,93),15,14:LINE (141,57)-(146,69),15:LINE -(158,69),15 

1199 LINE -(149,76),15:LINE -(153,87),15:LINE -(141,89),15:LINE -(129,87),15 
1299 LINE -(133,76),15:LINE -(124,69),15:LINE -(136,69),15:LINE -(141,57),15 
1219 PAINT (141,69),15:COLOR 14,9:LOCATE 1,19:PRINT "TEXAS SESQUICENTENNIAL" 
1229 LOCATE 4,23:PRINT "1836 - 1986":LOCATE 6,4:PRINT "159 YEARS" 

1239 LOCATE 21,4:PRINT "THE EYES OF TEXAS":LOCATE 21,28:PRINT "ARE UPON YOU" 
1249 PLAY "MBC4F.C8F8C16F8.G16A2F2":FOR T-1 TO 6999:NEXT T:GOTO 1999 
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Wie Feature 


Making MS-DOS more useful for you 


Wooing Ms.DOS 


By John McCormick 


S-DOS can drive the best of 
us batty at times with its 
pipes, filters and paths, but 


there are some wonderful things you 
can do with MS-DOS if you know how. 

Even more importantly, there are 
some things you ignore at your peril 
when you consign that MS-DOS man- 
ual to a dusty shelf. 

I recently worked with an insurance 
agent who had been trying to use a 
Tandy 1200 for almost a full year (with 
little success, I might say). 

I sat at his machine and typed in DIR 
to get an idea of his file structure before 
going any further. I was genuinely 
shocked to discover that he had no 
directories installed on his entire hard 
disk! The list seemed to go on forever. 
I asked him how he ever managed to 
find a file and he showed me a card 
where they had written the names of 
important files. Now that is really 
fighting technology, all because no one 
told him why he needed to use those 
commands in MS-DOS. 

When I asked him why he hadn't, he 
told me he wasn't interested in any of 
those technical computer "things;" he 
just wanted to run some programs. 

Just in case someone else is in that 
position, I will briefly explain the 
reason we use directories and paths. 

One important reason to segregate 
your programs is to make your direc- 
tory listing manageable. When looking 
for a word processing file, you don't 
want to sift through every Lotus 1-2-3 
or MS-DOS filename too. 

Another good reason for subdirecto- 
ries is to permit you to use COPY *.* to 
backup a set of files. This command will 
bea nightmare if done on a system using 


John McCormick started programming 
in 1965 while majoring in physics in 
college, and was formerly employed 
with Wang Labs. He has written several 
reviews for THE RAINBOW. 


a hard disk with no directories, as will 
DEL *.*, but when used in a directory 
(or subdirectory) these commands will 
make file management much easier. 

Consider this: many word processors 
will create automatic backup files when 
you save an updated version. While this 
can be most helpful for a short period 
(in case you have made a major error 
in the new copy), eventually your 
“BAK” files will run you right out of 
system space. 

If you are operating in a subdirectory, 
you can use DIR *.BAK (just to be 
certain), then DEL *.BAK to remove all 
those redundant files with ease — 
without any chance of deleting possibly- 
important system backup files (MS- 
DOS makes “.BAK” files of its own). 

If you still aren't convinced, think 
about this: If you load four programs 
onto your hard disk (or floppy), the 
chances are that two to three of them 
will each have a file named CONF IG. SYS 
(and perhaps other shared file names). 

"So what?," you ask. Well, MS-DOS 
won't permit more than one file with the 
same name and extension in the same 
directory; that's what! 

Just stop and think; if it did permit 
duplicate names, how would it know 
which one you (or a program) was 
referring to at a particular time? 

In the case of the insurance agent, he 
was unable to boot MS-DOS from his 
hard disk because of a special program 
he had installed. For months he had 
been trying to solve this problem with 
no success. The local Radio Shack 
dealer had finally told him there was no 
solution, and he had been using a floppy 
to boot MS-DOS for six months, even 
though he had a perfectly good hard 
disk. 

In 15 minutes I had cleaned the junk 
out of his system, built a directory tree, 
and installed MS-DOS in the root 
directory. After transferring his *prob- 
lem" program to a directory, the whole 
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system worked beautifully (and simply). 

Then I left them alone for a few weeks 
to use their system and get used to it. 
I asked them to keep a log of which 
programs they used most often, and 
when I returned for another session I 
installed a series of batch files that 
would automatically change directories 
and start up certain programs. 

The secretaries always used a word 
processing program, so I built a batch 
file for each with her name on it that 
loaded the word processor with just her 
files; likewise, the head agent only used 
the computer for an estimating pro- 
gram, and so on through the office. 

Now each person gets the program he 
usually wants by just typing his name at 
the beginning of the session. This makes 
the computer much more user friendly 
(important because only one person in 
the office understands any of what I 
have done to accomplish this) and the 
system now is in constant use. Before I 
made the changes, the computer was 
often left off for days at a time. 

I made some other changes to 
"sweeten" the system. Instead of C» I 
changed the prompt to three lines. It 
now looks like this: 


Time = current time i: 
Date = current date. 
Ip» SH Hi ; 


The last major improvement I made 
to his system was to eliminate the 
possibility of making a mistake when 
using FORMAT (and made it easier to use 
in the process). 

I just renamed FORMRT, then wrote a 
batch file to call the changed FORMRT 
name with Drive A: already designated. 

All of these simple MS-DOS pro- 
grams are illustrated following this 
article. 

Creating directories and tree (nested) 
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directory structures is very simple — 
type MKDIR followed by your choice of 
name and press ENTER. MS-DOS has 
created the directory. For example, 
MKDIR WORD ENTER creates the direc- 
tory WORD (perhaps a good place to put 
a word processor). 

To create a subdirectory in WORD, just 
type CD \WORD ENTER and you are in 
WORD (an empty place to be at the 
moment). 

To verify this, type DIR ENTER and 
the directory will show the path \WORD 
at the top. Or type CD ENTER and the 
screen will show \WORD. 

At this point, if you do a DEL *.* 
nothing will be deleted because there is 
nothing in \WORD. 

The subdirectory is created by typing 
MKDIR followed by a filename and 
ENTER. You have created a named 
subdirectory inside \WORD. Typing CD\ 
followed by the filename (let’s call it 
TEXT) puts you into the subdirectory 
TEXT. 

Try typing CD ENTER. You should see 
\WORD\ TEXT, 

To put some files into this, place a 
disk in Drive A and type A: ENTER. 
(Note: you are still in \WORD\TEXT if 
you return to Drive C.) 

Type COPY filename C: (where file- 
name is some file on Drive A's disk). 

Type C: ENTER then DIR ENTER, and 
you should find “filename” has been 
copied into \WORD\TEXT. 

You can also stay in \WORD\ TEXT and 
type COPY A: filename C: ENTER to do 
the same thing. 

Once you are in a certain directory (or 
subdirectory) you stay in it when you 
return to that drive, until changed (CD), 
even if you change drives and enter a 
new directory on that drive. Suppose 
you type A: ENTER then type CD\ dir- 
name ENTER (where dirname is a direc- 
tory on the disk in Drive A). If you now 
type COPY *.* C: you will take all files 
from \ dirname on Disk A and copy 
them to \WORD\TEXT on Drive C. 

Experiment a little with a new direc- 
tory. As long as you don't use DEL or 
ERASE, there is little harm you can do. 
When you're done, just enter the new 
directory (verify with CD ENTER), then 
type DEL *.* to remove all the files you 
were playing with (although the subdi- 
rectory entries “.” and “. ." will re- 
main unless you use the RD, remove 
directory command). 

As my teachers used to say, I will 
leave that to the student as an exercise. 


Hint: it is very simple, just look in your `“ 


MS-DOS manual; it will be a good 
chance to see if you can still find it. 
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toi install it, for an example: 


For those of you who have no con- 
fidence that you can repair any mis- 
takes, just make a copy of both the 
AUTOEXEC.BAT and FORMAT .COM files 
on a separate disk. If you experience 
trouble, just delete those files in the 
working directory and copy the origi- 
nals back onto your system disk. 


Batch Files 

To create a file the easy way, try this: 
COPY CON your name .BRT ENTER. This 
will permit you to enter file lines directly 
from the console (keyboard) to the file 
you specify in your name.BAT. The . BAT 
extension means that it will execute as 
soon as you type your name and press 
ENTER. 

Say you have WordStar installed in 
a directory named WORD, you could type 
CD\ WORD ENTER then WS ENTER every 
time you want to use WordStar, or you 
could create a batch file to do it for you. 
Type: 
|. COPY CON WORD; BAT ENTER | 
Hi D\WORD, ENTER ' MIO 

QS ENTER HHH 





5. ῬΟ5. creates a file "called WORD 
.BRT that will change directories and 
start WordStar when you type WORD 
ENTER. 

Suppose you had a dozen programs 
you want to access from the root direc- 
tory (where you always start when 
turning on the computer). You just 
prepare a .BAT file for each of them 
giving the full path and you will save a 
lot of typing over the years. 

This is what computers are for, to 
take care of the routine for you. 

The RUTOEXEC.BRT is the file that 
makes all else simple but, before fooling 
with it, rename your existing file like 
this: REN AUTOEXEC.BAT AUTOEXEC 
-BAA ENTER; this will “hide” the good 
copy and you can rename it later (or 
boot from your original system disk and 
copy just this one file back onto the hard 
disk if you run into real trouble and 
have to reset). 

/ Here is my AUTOEXEC. BAT: and. how 





COPY. CON. RUTDEXEEC. BAT ENTER ' 


(don't i type the part in parentheses) | 


ECHO OFF ENTER 





(this. stops the file from ΜΉΝ every 
move. to the screen) | iu | 





“DATE ENTER ' 


( (this causes the date prompt at startup) 


TIME ENTER ` 
(likewise for tiia) 
| DIR *.BAT ENTER: 





(this shows a list of all Batch: ΗΝ a 


reminder each time the system boots — 


(sos. 


PROMPT. Time = STS Date = 

ΦΝ56 ENTER i:i. 
(we'll. take this « one. piece at 8. time 
below) | i 


“CTRL-Z: ENTER: 

PROMPT peeves the information i that 
the computer presents each time it’s 
ready to receive a command (normally 
x» where x is the current drive). I bet 
you didn't know you could change that, 
did you? 

Well, it’s easy. In the PROMPT line, 
Time = will print exactly as typed 
because it isn't preceded by a dollar 
sign. $t causes the computer to display 
the current time and “8.” causes the 
computer to go to the next screen line. 
Date = $d is the same as Time- $_. “$_” 
goes down one line, then $n causes the 
default drive letter to be displayed and 
“$g” produces the greater-than symbol 
(>). 

My screen looks something like this 
when I boot my system: First I get the 
normal date and time prompts which I 
answer. Next I see a list of all “.BAT” 
files. Then, instead of “>” I get this 
prompt 

Time = 90:00:00 

Da te:= = DAY- θθ- 00 

Bert pH HE | 

This will continue until I type PROMPT 
ENTER, which will return the system to 
the default prompt of C>. 

If you nearly always go to the same 
program when starting up, you can add 
a line for that to the AUTOEXEC .BAT file 
instead of entering it each time by the 
keyboard. You can always change your 
mind and go to something else; AUTO- 
EXEC .BAT just sets up the system your 
way, then leaves it (and you) alone. 

i FORMAT is simple. Type: 
| REN FORMAT . COM AFORMAT 

N COM ENTER. | i 
“COPY CON FORMAT. BAT ENTER | 
| FORMAT AZ ENTER 
SUCTRLeZ ENTER (C 

Now when you type: FORMAT ENTER, 
the batch file calls AFORMAT (the original 
system FORMAT command) and directs it 
to Drive A. You can still use FORMAT on 
any drive by typing: AFORMAT ENTER 
but, for day-to-day use when you only 
want to format a new floppy in Drive 
A, the regular FORMAT.BAT will auto- 
matically prepare to format only Drive 
A and will provide the usual system 
prompt to insert a disk in Drive A. 

If you are using a two-disk system 
without a hard disk, just make that line 
RFORMRT B: to prevent you from for- 
matting your system disk by mis- 
take. 


MEI Feature 100 


Faster than a speeding bullet, 
this program lets you fly through RAM, 


leaving machine language programs in your wake. 









yourself being lured into the assembly language and 
machine code programming of your Model 100. 
This short program is designed to further entice you into 
the depths of the machine code power of the computer. 
The LCD is used very effectively to display the address, 
decimal, hexadecimal and ASCII character of seven 
consecutive bytes anywhere in the memory. You may also 
edit in decimal, Hex or ASCII. Other features of this 
program include a search routine and the ability to call a 
machine language routine from the display mode with one 
keystroke. 


If: have been reading PCM lately, you may find 


The Display Mode 

The display mode is entered immediately following the 
address entry. You may enter the address in either decimal 
or hexadecimal. Hex numbers should be identified by an 
‘H’ following the number. The Hex conversion routine is 
designed so that it is not necessary to enter lead zeros. Once 
in the display mode, the following options are available: 


space bar’) — Display next seven bytes 
hyphen key — Display previous seven bytes 
"AT = | Enter new address 


‘S? — Search for character string 
‘M? = Return to Model 100 menu (or use F8) 
"B? + Edit displayed memory location 


John Larrison is a service manager for the Business 
Systems Division of Harris| Lanier. He has developed 
numerous office automation and diagnostic programs 
currently in use nationwide. 


uper Editor 


By John Larrison 


TAB zz Execute machine code starting on first 
line of display 


The String Search 

Press the 'S' key from the display mode and you enter 
this routine. You may enter any string of characters at the 
prompt. It may be necessary to refer to the character chart 
in the reference manual for the appropriate graphics 
characters if you need to enter non-ASCII characters. Both 
the character string and the starting address default to their 
previous values. Therefore, if you wish to find the second 
occurrence of a string, you need only press the 'S' key and 
enter twice. 


The Editor 

To edit the memory (got it backed up?), simply press the 
*E' key. You are greeted with a unique cursor before the 
decimal number on the first displayed byte. If you enter a 
number, it is poked into this memory address. It is then read 
again, converted to Hex and ASCII and redisplayed. The 
cursor drops to the next line and reads from that address 
and again gives a screen display of the contents of that 
memory location. Although this may seem redundant, it 
assures that your address and actions are correct. For 
example, you cannot be fooled into thinking that you have 
edited the ROM. You are also protected from improper 
scrolls (remember, this is a machine code editor). For a good 
example of this function in operation, try poking a ‘1’ into 
location F648H. 

If you prefer to enter in hexadecimal notation, simply 
press the right arrow and the cursor moves to the Hex 
column. Press the right arrow again and you can edit in 
ASCII. It is not necessary to press the ENTER key in the 
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ASCII editor. You may also scroll up and down by using 
the cursor keys. 

To return to the display mode, press the space bar from 
either the decimal or the Hex editor. 


The Interesting Lines 


12 
14 
30-90 


100-140 


150-180 
200-260 


220 
230 


240 
260 


270 


280 


300-580 
310-320 


330 
340 


350-390 


400 
410 
420 
430 
440 


450 
460 
470 
480 
490 


600-620 
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ΠΠΠΠΠΠΠΠΠΗ 
[PCM AR conen tenno 
i παπα roce THU 
The listing: ii Í 
"REM 30e MCODE BB BID 
ΤΑ MACHINE CODE EDITOR * | 
3 REM * by JOHN LARRISON  * | 
REM. i WEIEN IE I E EAE SEE AE R ENER UTE I 
| 1% CLS:PRINT@12@, 1: INPUT" Enter Address Il 
Dec or Hex): 
12 'IFINSTR(AS$; "H*) ZUTHENASVAL(A$) :GOTOl6 
14 /ASSLEFTS (A8, LEN(AS) -1): GOSUB159: A-C 
16 CLS: ‘POKE6 3948 , THI PRINT! ADDRESS" , "7 DEG 
HEX. 'ASC" : POKE63048 , gu 

29 FOR L-0TO6:B-A*L: GOSUB69p : NEXTL 

3g X$-INKEYS:IFX$-""GOTO3Q | 

40 IFX$-2" "THENA-AT7 | 
(159 IFXS-"S"GOTO209 
' 66 IFXS-"E"THENL-0: R29: Β-Α: 6010479. 

79 IFX$-"- "THENAeA- iin 


52 REM: 


PCM 


Decimal number entry 
Hexadecimal number entry 
Display mode options 
Subroutine to convert decimal to Hex and 
prepare display 

Subroutine to convert Hex to decimal 
Character string search where: 

Sets up parameter (X) for first byte match 
Increments address (A) and checks for end of 
memory 

Detects for match of character string 

Checks for consecutive byte match in search 
string (WS) 

If complete string match is found, goes to 
display mode 

If byte match is not consecutive, resets pointer 
(Y) 

Editor where: 

Cursor is generated and displayed 

Clears cursor and checks for the ENTER key 
pressed 

Looks for space bar to exit the editor 

Looks for cursor keys and takes appropriate 
action 

Accumulates and displays keyboard entry 
Automatic entry if in the ASCII editor 
ENTER key pressed from Hex editor 

ENTER key pressed from decimal editor 

Pokes memory, then reads and displays from 
same address 

Increments pointers to next line 

Corrects for bottom line and scroll 

Reads and displays next line 

Decrements pointers to previous lines 
Corrects for top line and scroll 

Subroutine to read memory, convert to Hex 
and display 


T 
| BAR CODED LISTING | 
IM An A 













aes ;AS | 
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146 AS=X$+Y$:CS=STRS(C)+" | 


80 LEXS="M" THENMENU : 
85 IFASC (X8) GOTHENCALLA 


99 IFX$-"A"GOTOlUELSEGOTO2) 
19g IFO«JORC»25STHENC-j:BEEP 


119 X-INT(C/16):Y-C-X*16 


129; ‘X$=CHR§ (X448): RAD AI (X455). 
139 ¥S=CHRS (Y+48) : IFYSOTHENYS-CHR$ (Y455) 

| "'CS-LEFT$ (C 
$,4) :RETURN | i 


150 C=O: LFAS=""THENRETURN 


16% FORX=LEN(A$) TOLSTEP-1 | 
179 He aC CREGETG CAS) XY) +48: IFYS9THENY-Y- 
7 | 


1180: Ce C4Y*16^ (X-1): NEXTX ; RETURN 
200 CLS: η ER a search string: " 


:WS 

210. INPUT"Enter start location (Dec) i ";A 
220 X=ASC(MIDS(W$,Y,1)):BeA 

230 A=A+1: 1FA-65535THENINPUT"NOT FOUND" ; 


/X$:COTOlQ. | 

(24g IFPEEK (A) «&»XG0T0239. 

(1260 IFA-B-lORY-lTHENB-A:Y-Y41 

| 279, IF YoLEN(WS)+1THENA~A- ail BEEP 
':GOTOl16 


289 LEB<>ATHENY=1 
290 GOTO229. 


| 399 I:NSu " 


310 IFX23. 9THENX-Q | 

320 XS+INKEYS : a ES MU 
+LA4G+R+LEN(AS) , CHR$ (2314X) ; :X-X+. 3: GOTO 
319 | 

339 PRINT@S44L4404R," "; 
0420 

349 IFX$=" "ANDR«12GOTO30 


:IFASC (X$)-13c0T 


390 LFASG(X$)=28ANDR<12THENR=R+6 


369 IFASC(X$)=29ANDR>Q@THENR=R - 6 


37% IFASC(X$)30GOTO489 


389 IFASC (X$)=31GOTO45— . 

399 1FASC(X$)«3260T0399 

400 AS=A$+X$ : PRINT@54+L*49+4R, AS ; 

419 sth ai ah i GOTO449ELSEGOTOS 


4g 


420 FR-6TRENGOSUB159: TEC<PORC>255THENBE 
EP: GOTO3Q@GELSEGOTO449 


(439. C-VAL(AS) 


440 POKEB , C: GOSUB6QQ 

450 LeL*1:B-A-L 

460 IFL-7THENL-6:A-A41: PRINIGAE, ; : CALL16 
979 

479. GOSUB69Q : σοτοθρθ. 

489 L-L-1:B-A*L 

499 IFL=-1THENL=9; A=A- -1: CALL16984 

599 GOTO470 

699 IFB»65535THENPRINTQAQeAQL, SPACES (39 
j; RETURN 

610 C=PEEK(B): GOSUBLYD PRINT@49+40*L,B,C 


$; "ΑΦ "5 : TFO>31THENPRINTCHRS (C 
5 ELSEPRINT" η! ial 
629 RETURN PCM] 





ΠΠ Feature 1000/ 1200/ 2000/ 3000 


By Alfred J. Bruey 


(Page 18), William Barden’s article, 

“High Praise for Sequential files,” 
described the use of sequential files. As 
he stated, sequential files are often the 
preferred way to store data. but they 
aren’t the only way. Data can also be 
stored in random files. Before we go any 
further, let’s look at a few definitions: 


[F the August 1985 issue of PCM 


A file is a collection of records of 
a particular type. A record is a 
collection of fields. A field is an 
item of information about a par- 
ticular subject. 





Now for an example: Let’s think of 
a file as a file cabinet full of employee 
records. This file contains a record for 
each employee. The record contains 
fields: One field is the employee name; 
other fields might be the social security 
number, the hourly pay and the number 
of dependents. 

As you can see, a group of fields 
about one employee comprise a record; 


Alfred Bruey is a prolific author with 
over 30 articles published in microcom- 
puting magazines and a book From 
BASIC to Fortran published by TAB 
Books. He has been active in the com- 
puter field for over 20 years. 
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a group of records about one company’s 
employees comprise a file. 


File Types 

There are two basic types of files, 
random files and sequential files. To 
find a record on a sequential file, you 
must start reading the file at the begin- 
ning and read every record until you get 
to the one you wanted to read. Thus, if 
you want to read the 87th record in a 
sequential file, you must read the first 
86 records. Furthermore, if you want to 
insert a record between the 86th and 
87th records, you must read (and write 
to a new file) the first 86 records. Then 
the new record must be written to the 
end of this new file. Finally, the rest of 
the original file must be read in and 
added to the end of the new file. The old 
file must be deleted and the new file 
renamed so you'll be ready for more 
additions. For a few hundred records, 
this method isn't bad, but for a file 
containing thousands of records, it can 
become very time-consuming. 

Records on a random file can be 
accessed in any order (randomly, as the 
name suggests). Thus, to access the 87th 
record, merely specify that you want to 
read the 87th record and the disk drive 
head goes directly to the 87th record's 
location and reads in the desired record. 

But how do you know where a record 
is on a random file? You don't have to 
keep track of it. The system in the 
computer keeps track of each record's 
location. You can use a file creation 
program to generate a specific record; 
a month later you can ask to retrieve the 
same record. The BASIC program con- 
tains parameters that tell the computer 
where the data can be found and what 
format in which it is stored. 


A Sample 

Before we get too involved in details, 
let's look at an example. We'll create a 
random file that contains only five 
records, each consisting of three fields 
— a last name, a first name and a city 
name. 

The program for this is shown in 
Listing |. When the program is run, you 
are prompted to enter a last name, a first 
name and a city name. Be sure you have 
a blank, formatted disk in Drive B. The 
program disk should be in Drive A. Be 
sure you have the DOS prompt A> on 
the screen. Then type BASIC B:WRITE 
RAN and press ENTER. At the prompt, 
enter a data observation in the form of 
lastname, firstname, cityname. Be 
sure to press ENTER at the end of each 
line. Enter the following data: 
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When the data is entered, type *,*,* 
and press ENTER. This signals the pro- 
gram that you are done. 

Two files are created by this program: 

1) RANNAMES — the file that contains 
the data just entered. 

2) COUNT — this file contains only 
one value, the number of records in the 
file RANNAMES. Later programs will 
need to know this number. 


Reading this Random File 

The program in Listing 2 can be used 
to display records contained in the file 
RANNAMES. If you created a customer 
record file with a program similar to 
that in Listing 1, you would use a 
program similar to that in Listing 2 to 
access the data to get information about 
customer addresses, credit ratings, bill 
due dates, etc. 

If you are still in the BASIC system 
after entering and saving this program 
under the name READRAN, enter 


n" iH M 1 i nr 1i 
[ NEL d Mur in i I 
- Dt B READRAN’ | | 
à T Σ WW 


and you will be prompted for a record 
number. In our particular case, a 
number from one to five can be entered 
to retrieve a record and print it on the 
screen, or a zero can be entered to end 
the look-up process. 

This program has several features 
that are are worth noting. Note that 
1name$ is checked to see if it is equal 
to the string “***”. This is the "delete" 
indicator for the system. Later you will 
see that the file edit program (Listing 3) 
puts a set of three asterisks in the 
1name$ field to indicate that the record 
has been deleted. Try entering various 
values from one to five to see how the 
program works. 





Changing the File You Just Created 

Listing 3 shows a program that can 
be used to update the random file, 
which we created earlier. To make a 
change to this file, or any other random 
file, you need only be able to perform 
three functions: 


1) Delete a record 
2) Add a record 
3) Change a record 
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In this program, you must specify the 
record number of the record you wish 
to edit. This would not be a feasible 
access record for very large files. We'll 
talk about ways to cope with this access 
problem later. 


Running the Program 

Load the program Editfile into mem- 
ory and type RUN. You will be prompted 
to enter a d, a, c or q. Be sure to use 
the q option to end the run because you 


have to let the program update the value 
that is stored in data set COUNT. Now 
let's see how the delete, add and change 
functions are handled by the program. 


Record Deletion 

You must specify the number of the 
record to be deleted. Note that the 
record is not really deleted from the file, 
but the value *** is placed in the 
lname$ field of the record. In a large 
system where many deletions are possi- 
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expirabion date ANG signature on a separate sheet 


COD (add $1.90) 
TOTAL 





ble, it would be necessary to write a 
program that could physically remove | 
the records from the disk and release the 
space for use by other records. | 


| 
| 
Adding a Record x 

A new record is added in the same 
way a record is entered in our first 
program — values must be entered for 
the three fields. The program keeps 
track of the record number for you. All 
new records are added at the end of the 
file, but since this is a random file these 
new records won't be any harder to get 
to than the ones that were loaded into 
the file earlier. The record count is 
updated as each new record is added 
and this new value is written to file 
COUNT at the end of the run. 


Changing a Record 

You must specify the number of the 
record to be changed. The record is 
displayed field-by-field on the screen. 
Press ENTER if you want to accept this 
value, or type a new value for this field 
before you press ENTER. 


What if You Don’t Know the Number? 

To specify which record the user 
wants to delete or change, the user of 
the preceding program has to enter the 
record number. This is no problem for 
a file with only a few records, but for 
large files it can get to be a nuisance. To 
access a record in a large file, the user 
should be able to access a record by its 
“key.” The key is the value of one of the 
fields (or some combination of field 
values) or part of one of the fields. To 
be more specific, let’s assume for the rest 
of this article that the key is to be the 
first three characters of the last name 
field. 

But how do we use this key? If we 
start looking through the random file 
records record-by-record using our 
random read routine, we would end up 
taking more time than if we were to stick 
with sequential file techniques. 

What we need is a way to create a file 
in RAM (Random-Access Memory). 
This file links the keys (the first three 
letters of each last name in our example) 
with the record number in the random 
file. We can then look quickly through 
the RAM list (array) for the desired key 
and access the record (randomly) with 
the record number corresponding to 
that key. There is more than one way to 
perform this task, but I'll restrict the 
discussion to a simple method that is 
satisfactory for our system. 

As you create your file using Write- 
ran, you can create a sequential file, 


which we will call KEYFILE, which 
contains only the first three characters 
of each last name (the first three char- 
acters of LASTNAMES). At the start of 
every run of program Readran or Ed- 
itfile, the file KEYF ILE is read into a one- 
dimensional array in RAM. Next the 
program Readran or Editfile prompts 
the user for the last name (the first three 
characters of the last name are suffi- 
cient) instead of the record number. A 
quick search is made through RAM to 
find the matching three-character key. 
If, for example, the three-character key 
MAR is found in array position 173, a 
random read of record number 173 
brings in the desired record. 

The same changes must be made in 
this key data as you made in the data 
file itself. For example, if you delete 
record 209, the 209th position must be 
changed in the RAM array to *** so the 
system knows later that this record has 
been deleted. Also, if you change the 
key, be sure to change the key value in 
RAM. (Many systems do not allow a 


Listing 1: 


1g ' readlist 


(3g ' 


key value to be changed; it's up to you 
whether you want to allow it in your 
system.) At the end of each run, save 
this key file back to disk so it is correct 
the next time you want to use it. 

This system is simple enough to 
implement, but there is a complication 
I haven't mentioned: What if there are 
duplicate key values? For example, if 
there are 100 people with the last name 
Smith, you obviously have 100 key 
values of SMI. The search routine must 
be written so that if you find the value 
SMI, you are asked if that's the right 
one. If not, the program must be written 
so that it finds the next SMI in the RAM 
list and repeats the process. 

This description should give enough 
information to get you started on using 
the random file system. 


One Final Program 

Listing 4 shows Listfile, a program 
that reads and lists the random file. 
Note that the record number (which is 


4g OPEN "b: ΜΗ, AS #1 LEN-69 
59 OPEN "b:count" FOR TEN. AS 42 


69 INPUT#2, NUM* | 


70 FIELD¥1, 29 AS LS , (2g. AS FS , 29 AS C$. 


80 FOR 1-1 TO NUM% 
99 GET 41,1 

|19g9  LNAMES-LS | 
119  FIRST$-FS 
129 CITY$-C$ 


149 NEXT I. 

159 PRINT "End of Run” 
169 CLOSE 1 : 
179 CLOSE 2 


Listing 2: 


19 ' editfile 
29 ' update file: 
39 ' 


add, delete, or change records | 


not on the file) is listed with the record. 
Also, deleted records are excluded from 
the listing. This program can be used as 
the basis for a fancy report generator by 
adding headings, tabs, etc. 


A Final Note 

These programs can be changed to fit 
your own data formats. The framework 
is there to handle whatever records are 
needed to be put on a random file. You'll 
probably want to add the key search 
routines previously described. If you 
do, don't forget the following points: 

1) Be sure to update the key file 
whenever a key is updated in your data 
file. 

2) Don't forget to write out the up- 
dated key record before leaving pro- 
gram Editfile or Writeran or your key 
file won't match the data on your 
random file. You might even want to 
add a routine to write out this key file 
whenever a particular key is pressed so 
a lot of changes aren't lost in case of a 
power failure. 


20 ' read random file and list inon- -deleted records on ΙΙ i ΠΗ 


139 ΤΕ LEFTS (LNAMES , yerum THEN LERINT i (pues, FIRSTS, cms 
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30 


4g ' 

5g." 

69 OPEN "b:rannames" AS 41 LEN-69 

79 OPEN "b:count" FOR INPUT AS #2 

89 ' num$ is number of records in file 

99 INPUT#2, NUM% 

199 FIELD#1, 29 AS L$ , 29 AS F$ , 29 AS C$ 

116 PRINT" (d)elete, (a)dd, or (c)hange Record or (q)uit?); 
129 INPUT. ANSS$ 

136 IF ANS$-"d" THEN 18g 

149 IF ANS$-"a" THEN 299 

159 IF ANS$="c" THEN 379 

169 IF ANS$-"q'" THEN 569g 

170 PRINT"Press a, d, c, or q only":GOTO 119 

189 INPUT"Enter record number "; RNO% 

199 ΤΕ RNO%<g OR RNO%>NUM% THEN PRINT"Out of Range":GOTO 189 
289 GET&1, ΕΝΟΣ 

219 LNAMES-"'eyex" 

229 FIRST$-F$ 

239 CITY$=C$ 

249 LSET L$=LNAME$ 

259 LSET FS=FIRST$ 

269 LSET C$-CITY$ 

27g PUT41, ΕΝΟΣ 

280 GOTO: 119 

299 PRINT"Enter last name, first name, and city separated by commas " 
39g INPUT LNAMES,FIRST$,CITYS$ 

31g NUM$-NUM$-41 

320 LSET L$=LNAMES 

339 ΤΡΕΤ FS=FIRSTS 

349  LSET C$-CITY$ 

359 PUT#L, NUM% 

369 GOTO 119 

370 INPUT"Enter record number "; RNO% 

389. IF RNO%<@ OR RNOS>NUM% THEN PRINT"Out of Range":GOTO 376 
399 GET#1, RNO% 

400 LNAME$S-LS 

419 FIRSTS-F$ 

429 CITY$-C$ 

439 IF LEFT$(LNAMES ,3)="%*" THEN PRINT"Record has been deleted ":GOTO 119 
449 PRINT "present values are " 


459 PRINT." Last Name is ";LNAMES 
469 PRINT 3 First Name is ";FIRSTS$ 
470 PRINT " City is ";CITY$ 


48g INPUT"Enter last name ";AAS:IF AA$-"" THEN AAS=LNAMES 
499 INPUT"Enter first name ":BBS:IF BBS="" THEN BBS=FIRSTS$ 
500 INPUT"Enter city ";CO$:IF CC$-"" THEN CC$-CITY$ 

516 LSET L$-AAS$ 

529 LSET FS=BB$ 

530 LSET C$=CC$ 

549 PUT#1, RNO% 

550 GOTO 119 

56% PRINT "End of Run" 

579 CLOSE 2 


589 OPEN "b:count" FOR OUTPUT AS *2 
599 PRINT#2,, NUM% 


699 CLOSE 1 
619 CLOSE 2 
629 STOP 
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Listing 3: 


19 * readran 1 

20 ' read random file 

39 ' 

4g OPEN "b:rannames" AS #1 LEN=69 

59 OPEN "b:count" FOR INPUT AS #2 

69 INPUT#2, NUM% 

79 FIELD#1, 29 AS L$ , 29 AS F$ , 29 AS C$ 

89 PRINT"Enter record number (@ to stop) "; 

99 INPUT ΕΝΟΣ 

199 IF RNO%<g OR RNO&>NUM% THEN PRINT"Out of Range":GOTO 99 
119 WHILE RNO$ — g 

128 GET #1,,RNO% 

139 LNAMES=L$ 

149 ^ FIRSTS-FS 

159 GITY$=c$ 

169 IF LEFT$ (LNAMES ,3)="***" THEN PRINT"Record has been deleted":GOTO 189 
179 PRINT RNO$S;LNAMES,FIRSTS$,CITYS 

189 PRINT"Enter record number (6 to stop) "; 

199 INPUT RNO% 

209 IF RNO&<% OR ΕΝΟΣΣΝύΗΣ THEN PRINT"Out of Range":GOTO 199 
219 WEND 

229 PRINT "End of Run" 

239 CLOSE 1 

249 CLOSE 2 


Listing 4: 


1g ' writeran.bas 
create original random file 


data for file entered from keyboard 
g OPEN "b:rannames" AS 41 LEN=69 
79 OPEN "b:count" FOR OUTPUT AS #2 
8g NUM$-0 
99 FIELD41, 29 AS L$ , 29 AS FS , 29 AS 65 
199 PRINT"Enter last name, first name, and city separated by commas” 
119 INPUT LNAMES, FIRSTS, CITY$ 
129 WHILE LNAME$<>'"*" 
139. NUM%=NUM%+1l 
149 LSET LS$=LNAMES 
159. LSET FS=FIRSTS 
16g LSET C$-CITY$ 
176 PUT#1, NUM% 
189 ^ LPRINT NUM$;L$;F$;C$ 
199 INPUT LNAMES,FIRSTS$,CITYS$ 
209 WEND 
219 PRINT "File created" 
229 PRINT#2 , NUM% 
239 CLOSE 1 
249 CLOSE: 2 
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Memory Upgrades for Tandy Portables! 


Model 600 96K RAM Upgrade 
$249. or $465. for two 


Save up to $335. with this upgrade designed 
specifically for the Model 600. The 96K up- 
grade card fits into existing slots in the Model 
600 and adds either 96K or 192K of RAM to 
the computer. 


Model 200 Model 100, 8201 or M10 


24K RAM Upgrade 8K RAM Upgrade 
$89.00 $27.00 


Two for $170. $75. for pkg. of 3 


Save up to $330. with this ex- Save upto $282. upgrading an 

act replacement while bringing 8K Model 100 to 32K. The 

your Model 200 up to 72K. modules alsofitthe NEC 8201 
and the Olivetti M10. 


* * * BUY QUALITY δ. SAVE * x κ 


All three upgrades feature low power version of CMOS static RAM for 
minimum battery drain and maximum reliability. Our products are 10096 
tested before they leave the factory. Every upgrade carries with it a 3O day 
satisfaction money back guarantee and 1 yr. replacement warranty. Step 
by step illustrated instructions are included, and our customer service 


support is as close as your phone. 


TO ORDER 
CALL 714-540-1174 
or WRITE 


M/C, VISA, CHECK or MONEY ORDER American 
CALIF. RESIDENTS ADD 696 Sales Tax Al Cryptronics Inc 
9 ° 


SHIPPING-ADD 
UPS Ground $1.50 (Formerly Cryptronics, Inc.) 
2nd Day Air $4.00 1580 Corporate Drive, Suite 123 


Next Day Air $12.00 Costa Mesa, California 92626 
Tandy is a registered trademark ot Tandy Corp. (714) 540-1174 











Wrist 
Terminal 


By 
Carl 
Oppedahl 


ou’re at the airport with 10 min- 

utes to spare before the flight 

begins boarding. Earlier that 
day, your watch chirped, displaying a 
message that it’s your sister’s birthday. 
She’s in Sweden — let’s see, what time 
is it there? Add six hours or subtract? 
No need to calculate, you just tap a 
button on your wristwatch until it 
shows your sister’s name, and the time 
in Sweden is displayed. Now, what’s her 
phone number? Tap the watch a couple 
more times and her phone number 
appears. You finish the phone conver- 
sation with a full minute to spare before 
boarding the plane. 

Back in the office a few days later, 
you load a tape into the Model 100 and 
edit the listings for several friends’ 
phone numbers. Hooking up a cable 
from the computer to the watch, you 
load the new information into the 
watch. It chirps when it is full of data. 
The updated information is now avail- 
able on the screen. 


What You Get 
The watch comes with a 24-character 





Carl Oppedahl is a lawyer specializing 
in technological litigation. He is the 
author of Inside the TRS-80 Model 100. 


display, two rows each of 12 characters. 
(The row width is just right for a phone 
number with area code.) Each character 
is formed from a five-by-seven pixel 
display — somewhat coarser than the 
six-by-eight array in the Model 100 and 
Tandy 200. Rather than being square, 
the pixels are enlongated slightly in the 
vertical direction, making more reada- 
ble character shapes. The display shows 
uppercase letters, numerical digits and 











a few punctuation marks. 

The bezel has six membrane buttons: 
up- and down-arrow keys that act as 
cursor controls, keys to select the time 
or alarm displays, a key for setting the 
time or alarm, and a key to select data 
display mode. 

An unnecessarily large protrusion at 
the left side of the bezel forms the serial 
input contact for data loading; the RS- 
232 cord provided with the watch has 
a mating connector. The electronic 
“works” of the watch contain the usual 
lithium power cell, quartz time refer- 
ence, integrated circuitry and piezo- 
electric beeper. 

The information loaded into the 
watch is sent in 80 records of 24 char- 
acters, totalling just under 2K of eight- 
bit RAM. The watch operating system 
partitions RAM into a scheduled-alarm 
area, a world-time area and up to a 
dozen user-labeled data areas. The 
relative sizes of the areas may be 
changed by the user as desired; the only 
constraint is that at most a dozen data- 
area labels (each one counts as a record) 
may be set up and the total number of 
records in all areas may not exceed 80. 

Software provided with the watch 
allows your favorite personal computer, 
including the Model 100 or Tandy 1000 
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to set up the data and transmit it to the 
watch. You type in the various pieces of 
information, such as: 


9 The date and time for one or more 
alarms scheduled days or weeks in 
advance, and a 12-character message to 
be displayed. 

€ The time zone for one or more loca- 
tions, and a 12-character message to be 
displayed. (The city name appears as a 
default but you can edit it; ‘1° specifies 
the name of the person as well as the 
city.) 

€ The time and day for one or more 
weekly alarms, and a 12-character 
message to be displayed. 

€ 24 characters of text for each of 
several data entries. 

9 A heading (label) of up to 24 charac- 
ters for each partitioned group of data 
entries. 


When you type the information into 
the computer, it is kept in BASIC vari- 
ables. After everything has been typed 
in, a few keystrokes allow you to trans- 
mit the information from the BASIC 
variables into the watch, destroying 
whatever was in the watch before. 

The RS-232 link from the computer 
to the watch is one way; there is no way 
to load information from the watch 
back into the computer. This means you 
cannot, strictly speaking, edit the 
watch's contents. To avoid the prospect 
of having to retype everything whenever 
you want to reload the watch, the 
software allows you to store the data 
from the BASIC variables to cassette (or 
disk in the Tandy 1000), and vice versa. 
Soto change one or two phone numbers 
in the watch, you would: 1) load the 
BASIC program from tape or disk; 2) 
reload the previously stored watch data 
from tape or disk; 3) edit the desired 
records; 4) transmit the edited informa- 
tion into the watch; and 5) store the 
edited information back onto tape or 
disk. 

Information can reach the watch only 
from the provided driver program and 
information enters the program only 
from the keyboard. Don't expect to be 
able to load the watch based on phone 
numbers given in, say, your RDRS file. 


Problems with the Watch 

The main problem I found is with the 
LCD display — it is hard to get the 
viewing angle just right. In a market 
where nearly every new watch on the 
market, from a $30 Swatch to a $20 
Casio, is water resistant, it is surprising 
that the RC-1000 is not. There is appar- 
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TANDY computers are created equal. . .all retailers 
are not. 

A good price is, obviously, very important but there are "other important differ- 
ences" which the buyer should be aware of, before parting with any money. A good 
example is '''the retailers buy-back policy *", to insure the buyer against that ex- 
pensive mistake, *the call free number for easy price comparison and “credit card 
ordering for convenience and safety. The price quoted should be *the total price with 
no road-freight charges (to be added later). Under normal circumstances the order 
should be *shipped the next business day and a "same day rush-service" should be 
available. 

* For a small restocking fee. 


CUSTOMER SERVICE/QUESTIONS ABOUT 
YOUR ORDER and in TEXAS 1-817-573-4111 


(9 am-5 pm TEXAS TIME MONDAY-FRIDAY) 


Fort Worth Computers 


377 Plaza 
Granbury, Texas 76048 


Na CALLFREE NUMBER: 





ently no way to silence the hourly 
chirping, nor to leave the daily alarm off 
for a day. 

Once the offset for a particular time 
zone has been entered, the “world time” 
display for that zone shows a continu- 
ally updated local time. This is nice, but 
since the watch is calculating anyway, 
it would have been nice if the date for 
the distant zone could also be calculated 
and displayed. 


Problems with the Software 

Many months ago, the Tandy 1000 
was put on the market, bundled with 
software for the Apple, Commodore 
and IBM PC. I was one of the first to 
try out the recently released Model 100 
software. It contained a number of 
bugs, but Seiko provides the revised 
program to purchasers at no charge. 
The Model 100 software, for example, 
required the user to press the ESC key 
at times where the documentation indi- 
cated the ENTER key was to be used. 
Also, some key sequences seemed to 
lock up the program completely, requir- 
ing a CONTROL-C, or worse, to get out. 
And after a CONTROL-C, all the labo- 
riously typed watch data is lost. 

The software, written in BASIC, is so 
large that nearly all files in the Model 
100’s RAM must be deleted to fit it in. 
So little free space is available that the 
watch data cannot be sent to RAM, but 
rather, must go to cassette. Much of the 
bulk of the program comes from data 
lines containing various city names and 
time zones. I would have preferred to 
leave out some city name listings if it 
would allow the watch data to be sent 
to RAM. 








The fact ihat the majority of orders are from *repeat-buyers is a strong indication 
of the great satisfaction and trust that our customers feel. However, for those still 
not convinced we offer ?references to prove our bona fides and *that the Radio Shack 
warranty and service will be available, to our customers, NATIONWIDE. 

These eight important considerations will be yours when you order from Fort 
Worth Computers. Call (free) for a price comparison. 


Documentation and Support 

There are user's manuals for both the 
watch and the software, and a handful 
of little slips of paper with corrections 
and addenda. While I found the watch 
manual to be clear, the software manual 
seemed confusing. The only way I was 
able to make sense of it was by loading 
up a sample data file included on the 
tape cassette and editing it. Seiko 
provides a toll-free number and they 
have a technician there who is quite 
knowledgeable. 


FORT WORTH COMPUTERS 
esi il 


(WE ARE SERIOUS ABOUT SAVING YOU MONEY) 
Located 30 miles from Ft. Worth 


wes (1805) 433-S-A-V-E 


Conclusion 

Seiko calls this the world’s smallest 
peripheral, and it probably is. It is a 
handy way to keep phone numbers and 
other information readily available, and 
surely represents the wave of the fu- 
ture. [PCM] 
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By Richard Ramella 


his claim may seem to beggar 

| logic, but you can store Model 

100/200 text in about 69 percent 

of the memory usually required. That 

means 1,000 bytes can be squeezed into 

approximately 690. You can write a 

20,000-character file, compact it and 

come up with more than 7,000 bytes 
that weren’t there before. 

The method uses two programs: Boa 
One, which encodes a text file in place, 
and Boa Two, which loads the coded 
material from cassette into a plain text 
file. Boa is meant as an emergency 
measure when you're writing in the field 
without storage capability and nearing 
memory limit. It can give the margin 
you need to return to your operation 
base with all material intact. 

Richard Ramella is a former newspaper 
editor who now works as a writer for a 
California hospital. He has published 
more than 200 computer programs. 
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100/ 200 


I won’t keep you in suspense about how Boa does its 
work. It substitutes single, normally unused ASCII 
characters above CHR$(122) for high-occurrence two- 
character keyboard combinations. Boa is made efficient 
because it POKEs the shorter coded version of the text 
directly back into the file from which it’s being fed. You can’t 
see it happen, but the coded version chases the plain text, 
never catching up because it's truncated. What remains 
plain at the end is erased by you, for these are unneeded 
bytes. This in-place operation allows quite large files to be 
handled. 


The Results 

Since the major interest is in results, I'll cover use of the 
program and leave theory for last. 

To test this method, create a brief text file — 80 characters 
or so — and run Boa One. At the start there's about 12 
seconds of nothing, then comes a prompt: File to be 
BOR" d?, which must be answered with the name of the file 
typed in capital letters. The .DO extension need not be 
typed. If the file is not in the system, the program ends, but 
if it is found, the program has also figured out its starting 
address in memory. This is all that's needed. Boa codes the 
file in its peculiar way. 

At the end of the run is the screen message SEE ΄ΕΙΙΕ- 
NAME” FOR NEW VERSION. Go to the text file that is named. 
You will find apparent gibberish there. Press Function key 
| (ΕΙ), type ΧΧΧ and press ENTER. The three asterisks mark 
the end of the coded material. With the cursor over the first 
asterisk, press ENTER, press key F7 and ENTER, then press 
key F6 and ENTER. This erases the unneeded plain text at 
the end of the file. The number of characters in erased text 
represents the number of bytes you've just gained by 
squeezing the file with Boa. 

Now you have a file filled with gibberish. The next step 
is to save the file onto cassette. Position a fresh cassette tape 
in the recorder and press the Record and Play buttons 
together. Go into the text file, press key F3, type the filename 
and press ENTER. Wait for the file to load, then rewind the 
tape to the start of the file and press the Play button on 
the recorder. 

Load Boa Two and run it. Again there's the 12-second 
lull, then a prompt: Name of file to reclaim?. Answer 
it by typing the filename and pressing ENTER. The .DO 
extension need not by typed. With this the program feeds 
the code off the tape, turns it back into plain text and sends 
it to a text file in the computer. At the end of the run you 
will find the text file intact. 

There are a few warnings. Do not type plain text onto 
the end of a coded file. After truncating a file, start a new 
one. Don't append truncated files; you could create a file 
that cannot be held in available memory when it's translated 
back into plain text. The major drawback of using Boa is 
one of time. It can take about 18 minutes to translate 16,000 
characters of code from tape. I find this acceptable in the 
desparate times I use Boa. If you run Boa One when there 
are 1,200 or fewer free bytes in the system you can get an 
OM (out of memory) error. 


The Theory 

Now for some working theory. 

One of the capabilities not covered in any depth by the 
Model 100/200 manuals is POKEing into memory. This is 
probably a wise omission — except to experts like you and 





Super 
Utility 


for PC/MS-DOS™ 


Fixed/Floppy Disk Tools for Tandy 1000, 1200, 


2000, ΙΒΜ PC”, XT", AT", Compaq, AT&T 6300, 
Leading Edge, and many other PC compatibles. 


Data file recovery, disk exploring, 
zapping, and MUCH more! 


Accidental deletions and disk directory problems can happen to 
anyone at anytime... a power spike, fingerprint, speck of dust, 
hardware problem, or simply typing DEL *.* in the wrong sub- 
directory can destroy critical data in a moment without warning. 
Therefore we introduce Super Utility for the PC - an easy to use 
disk utility containing many functions sorely needed in today's 
PC/MS-DOS computing environment. It's really great! 


With SU/PC you can restore damaged or deleted files using two 
different methods (one very easy, the other a bit tougher). Even 
clusters of an erased file assigned to another file can still be 
restored, unless the user has physically written over every byte of 
the original data (most applicable with word processing files). 


In addition to file repair and recovery, Super Utility provides 
sector verify, sector editing, modification of sectors in Hex or ASCII, 
ease of renaming of files and setting their attributes (lock and 
unlock files, make them visible/invisible, etc.), ASCII string search, 
copying sectors to a file, diagnostic sector checking, mapping of 
the FAT table of a file or an entire drive, visual graphics pertaining to 
your system, and full directory and sub-directory editing without 
endless menu-hopping - all in one program. Want to change the 
name of your sub-directrory without copying all your files to a new 
one? Just retype a new name over the old one with SU/PC! The 
sector display mode displays all 512 bytes on-screen at one time 
and allows you to fully explore your disks. SEARCH and CHANGE 
are nice here too! Will find any occurance of a byte or string on your 
disk. Compatible with DOS versions 2.0 - 3.1 on most systems. 
Some computers may require the use of PC-DOS., Color, 
composite, or monochrome video are supported. A great tool for 
fixed disk users as well as floppy. Also compatible with IOMEGA's 
Bernoulli Box™ storage device (distributed by Tandy as the 
Cartrdge Disk System). SU/PC is a totally new program that fills the 
gaps that PC users have most need of and have asked us for. It's 
aimed at the beginner, the "office user", hobbiests, students of the 
PC, or programmers alike. Unprotected media. 


Super Utility/PC 
ony $89.95 


See Review in March '86 PCM 


-POWrE3XOrc- 


17060 Dallas Parkway, Suite 114 
Dallas, Tx 75248 + 214/733-4475 


Ordering, questions, and support always available on the PowerSoft Sig! 
Type GO PCS-56 from any prompt on CompuServe™! 


Available worldwide through Radio Shack™ 
Express-Order - Cat # 90-0407 


Prepaid or charge card orders (only) include free UPS shipping to US addresses! Blue 
label, COD, or over-night shipping available at extra charge. Visa«MasterCard 
accepted. Canada, please add $3; airmail. Other countries add $15 for airmail. 
Foreign orders, please use Charge Cards ONLY. Checks not drawn on US banks not 
accepted. Texas residents must add appropriate sales tax! 
Requirements: IBM PC or compatible running PC/MS-DOS 2.x-3.x, minimum of 128K 
momor and atleast one disk drive. PC-DOS may be required for use. 

IBM, PC, XT, AT are registered trademarks of International Business Machines Corp. 
MS™ is a regstered tm of Microsoft. Radio Shack™ is a registered tm of Tandy Corp. 
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HARDWARE SPECIALS 


Tandy 600 CALL 
Tandy 3000 CALL 
25-1000 Tandy 1000 2-drive CALL 
Tandy 1000 10MB HD CALL 
251004 Memory Board $189.00 
251005 Second Drive CALL 
251006 RS232 CALL 
251007 HD Controller CALL 
251010 Mouse Calendar CALL 
251011 Memory Plus CALL 
251013 300/1200 Modem CALL 
251014 Plus RS232 CALL 
251015 Plus Mouse 

Controller CALL 
26-3802 Model 100 24k — $449.95 


ACCESSORIES 


Novation J-Cat Modem $129.95 
USR Password 300 $179.95 
USR Password 1200 $399.95 
USR Password 2400 $599.95 
Elephant Disks SSDD $18.95 
Elephant Disks DSDD $24.95 
Bonus Disks SSDD 

(Box of 11) $14.95 
Bonus Disks DSDD $19.95 
Mach 11 Joystick $39.95 
26-3012 Deluxe Joystick — $34.95 


Full line of printers available: 
C. ITOH Printers 


26-3808 Micro Floppy 

Disk Drive $179.00 
26-3860 Model 200 $749.95 
26-3816 8k Upgrade 

Model 100 39.95 
26-1276 DMP-105 Printer 

80 cps CALL 
26-1278 DWP 220 Printer — CALL 


PBJ Multi-function Board 


TRS-80 Trademark Tandy Corporation 
Prices subject to change without notice 
Write for our FREE newsletter 


DELKER 


IM 800-545-2502 
(Tennessee) 


Panasonic Printers 


Kaypro 2000—the ultimate MS-DOS 
portable computer. LCD screen, 730k 
disk, 758k memory. $1,895.00 


Call for prices and availability of 
your favorite software and 
hardware. All advertised items 
subject to availability. Prices do 
not include shipping and handling. All 
of the above units are covered by our 
120 day carry-in warranty. 


p- 


DELKER ELECTRONICS, INC. 
P.O. Box 897 408 C Nissan Blvd. 
Smyrna, TN 37167 


πι 800-251-5008 


m 615-459-2636 
(Tennessee) 


Β 615-254-0088 
(Nashville) 


Visa, Mastercard and American Express 
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me — for it's possible to foul things up quite nicely when 
poking around in memory. Boa One is precise in what it 
does. In lines 150-190, the program searches memory for 
the starting address of the text file you name. Line 200 is 
the formula of a successful find. With this memory address 
stored in variable K1, the program is set to start poking the 
new code over the old text in lines 220-230, incrementing 
K1 by one with each POKE of a character into file memory. 

Then there's the matter of the major magic of this system. 
In the English language as it is generally written, the 
majority of characters are spaces and lowercase letters. The 
four most common letters appear to be a, e, i and o, though 
not in that particular order. To be truthful, I inferred this 
knowledge from the tile distribution of a "Scrabble" set. 

I decided to make a search string of fewer than 245 
characters made up of most common two-character 
combinations occurring in general English. These are made 
of a space, plus letters ‘a’ to ‘y’, then each vowel mentioned, 
plus letters ‘a’ to ‘y’. At the same time I created this string 
in the program, I made a string using most of the ASCII 
characters following CHR$ (121). To see these strings, break 
into either Boa program when the first prompt appears, type 
PRINT B: PRINT E and press ENTER. 

When an in-string test in Boa One finds a two-character 
string in ‘B’ matching what has just come out of the plain 
text file, it POKEs a corresponding symbol from the ‘E’ string 
back into the file as the code. If it doesn't find a match, it 
POKEs the left character of the search string and continues 
input. This is why a coded file contains capital letters, 
punctuation and unrecognized two-letter combinations. It 
also combines two spaces into one CHR$(255). 

Boa Two works in reverse. If a code symbol is found in 
the *E' string, its matching two characters in the ‘B’ string 
are passed on to the file. In this way the translation is made. 

Further compression is possible, but I abandoned the 
effort when the listing for both Boa programs began to grow 
past the savings that could be realized on computers at the 
lower edge of memory, The longer program, Boa Two, 
requires only about 2,200 bytes to run. This in itself is part 
of the savings possible with the system. 

Last advice: When you've used Boa One to squeeze out 
everything possible, there's one more memory grabber. Kill 
the listing for Boa One and start one last desperate text 
file. D 


¢heapware® Record Keeping 
for the Tandy™ 1000, 1200, 3000 and compatibles 


Tax Record: Store your income and expense records on disk in 32 types and 8 classes for 
any calendar year with this program. Then print the entire ledger, all entries in any 
month, any type or any class with totals for cach type within the class $30.00 


Personal Diary: This program will allow entry of up to 960 characters of text for any day, 
encrypt that text and search the entire diary for the string you designate. An almanac will 
display astrological and astronomical data and a calendar for the month. Up to 22 
reminder messages can be stored by the program. Five vear diary $35.00 


Price includes first class postage. VISA/MasterCard accepted. 


Information/Orders call: 
Robert L. Nicolai 800-NICOLAI (642-6524) 
4038 N. Ninth Street or 
St. Louis, MO 63147 314-621-7618 in Missouri 


CERTIFICATION 
si 


Tandy is a trademark of Tandy Corporation 
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| ponis 1: 


unen B m FOR ΚΩ]. -i TO Qe: "POKE Klik, 42: BE. 

199 REM. * BOA ONE: Text Constrictor * ETR EP: NEXT: CLS: PRINT. "SEE TES FOR. NEW ΥΕ. 

5-86 Model 199/299 8K . | RSION. MONDO D d | 
110 MAXFILES-1: CLS: CLEAR 9 | DEFSTR A. TITI mI FERITATE EUERE ΗΝ 
p 8p HIR = 


.G: ASCHRS(32)4"aeio" HiHi | BAR CODED LISTING 
rue ue m du te a ΤΉΚΙ | 
139 B=B+MID$(A,¥,1)+CHR$(Z); E=E+CHRS(X) | Li i HHI 
pXexel: IF X=127 OR X-143 OR X=224 THEN | 1 
ans ο ον Model [199/299 ΑΗ i 
149 NEXT 2,Υ: BoB+STRINGS (2, 32): E-E+CHR (119 MAXFILES=2: CLS; CLEAR. 399: |DEFSTR. A 
$(251) Haut Ch A=CHRS(32)+"aeio" | 
159 INPUT "File to be BOA'd";F: X-63919. (012g X-123: BeSTRINGS(2, 255):  E-CHRS (255). 
169 X+X+1: IF PEEK(X)=@ THEN 169 ELSE IF | |: FOR Y=1 TO 5: FOR 2-97 TO 121 itt 
X>64128 THEN PRINT "No such text file. Mts h B-B4MIDS(A,Y, 1)4CHR$ (Z): /B-ERCHRS(X) | 
ΤΕΝ HT Sp a BHIR X-127. OR Xela3 OR X225 ΗΡΙ 
179 IF PEEK(X) 192. THEN. 169 jt i H μή | 
189 Q-LEN(F)-3: R-l | E EHE EDU NEXT id M BenesTRINGS (2, 32): geben 
199 IF MIDS(F,R, 1) <>CHRS (PEEK (X+24R) ) ΠΕ DURER SCAT # 
EN 16 ELSE IF R«Q THEN R-R+1: GOTO 199 150 INPUT "Name. of Eia to iFeclaim";F. ii 
290 K1=PEEK(X+1)+PEEK(X+2)*256. | 16 OPEN "CAS: "4+F+" DO" FOR INPUT AS 1: | 
219 OPEN F FOR INPUT AS 1: CLS: PRINT ‘a OPEN Hee Ρο. FOR ‘OUTPUT. AS. 25 ΠΗ 
‘orking' ili (1 
220 IF EOF(1) THEN 259 ELSE ccu | E Hi 
;1): IR LEN(C)«2 THEN 229 | αν, Z-INSTR(E, E ar ei d 
239 Z-INSTR(B,C): IF Zeg OR. 2/2-1NT(2/2) | 92- 1,2) ELSE. Dek ini 
THEN 240 ELSE POKE Kl4Ql,ASC(MIDS$(E,(Z* | 190. PRINT $2, D; 
1)/2,1)): Pme ΘΗΝ; GOTO idi ΠΠ END ΠΗ 





Need a ΞΕ gift idea? 
Give your friends a subscription to PCM 


The Falsoft Building 
P.O. Box 385 

The Personal Computer (8021: ale 
Magazine For Tandy Computer Users 

| would like to send a PCM gift certificate for a one-year (12 months) 
subscription. 

To: 
Name 
Address 
ΟΕ ze s iu ci SHA ore ZIP 
From: 

Name 

Address 

i ώς δι muc cuoi n cate o ecc IP 
Payment Enclosed O 
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"Subscriptions to PCM are $28 a year in the United States. Canadian rate U.S. $35. Surface rate to other countries 
U.S. $64; air rate U.S. $85. Kentucky residents add 5% sales tax. All subscriptions begin with the current issue. 
Please allow 5 to 6 weeks for first copy. U.S. currency only, please. In order to hold down non-editorial costs, 
we do not bill 
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1000/1200/2000/3000 


our last episode we covered some of the powerful 
I Tiu programs and “batch” commands available 

on the Tandy 1000, 1200, 2000 and 3000. The 
utility programs in MS-DOS are separate program modules 
called by a single name from MS-DOS to perform useful 
functions. The batch commands actually make up a 
complete programming language in which a sequence of 
MS-DOS steps can be defined for automatic execution 
without operator intervention. 

The SORT utility program, for example, enables you to 
sort any ASCII file on disk into sequence, a handy feature 
for alphabetizing data or directories. Last month we 
described how normal output to the screen or from the 
keyboard could be redirected to or from a disk file — the 
command R»sort < maillist.dat >mlsorted.dat 
would enter the file MAILLIST.DAT, sort it in ascending 
alphabetical sequence and put the output of the sorted file 
to the new file MLSORTED . DAT. 

The SORT program can also sort in descending sequence 
(reverse) with its ^R option: 


Rsort/r«maillist.dat »mlsorted.dat 


SORT can sort a file starting with any character position 
with its “+m option. This command line sorts on the fifth 
character position: 


A>sort 7+5< maillist.dat »mlsorted.dat 


Another type of redirection, called “piping,” routes the 
output of one command to the input of another command. 
The following command sends the output of a directory 
listing to the SORT utility to produce a sorted directory and 
then to the MORE utility, which displays only a screen full 
of data before asking the poignant question - More - 


β»α1γ! sorti more 


Also described in the last column were several “batch” 
commands in MS-DOS — special commands that can be 
used to construct sequences of DOS commands that are 
executed automatically as batch files. Among the com- 
mands were: 


€ REM — Remarks 


William Barden, Jr. is a master communicator in a 
field in which he is one of the few recognized experts 
— microcomputers. A prolific author of more than 
27 books on computers and computer programming, 
Bill also has authored several instructional software 
projects for Tandy/ Radio Shack. 





€ ECHO — Turns display on and off and remarks 

€ PAUSE — Temporarily suspends the batch operation 
for some manual intervention 

e Ir — Tests a condition 

€ GOTO — Alters the path of the batch commands 

€ FOR — Sets up repeat of commands 

€ SHIFT — Allows many command parameters 

@ SET — Changes command parameters 


We showed examples of all but the last three commands. 
Also mentioned were “replaceable parameters” in the batch 
file call. Replaceable parameters are arguments that can be 
used within the batch file itself. The replaceable parameters 
take the form of variables X0, %1, %2, %3, %4, %5, %6, %7, 
%8 and %9 within the batch file. In the actual batch file call, 
they are replaced by the text used in the call. 

Another utility discussed was F IND. It finds all occurrenc- 
es of a given text string in a specified file. The lines of the 
file in which the text appears are listed on the screen. When 
coupled with MS-DOS batch commands, F IND can be used 
to create a truly impressive function. The batch file 


CLS. 

echo off 

echo ; ***FINDMULT*** ] j 
rem Finds file lines in which there are several fields. 
rem Syntax: FINDMULT filespec stringl string2 ρα 


rem Use dashes if no string 

if exist %1 goto nextl 

echo File does not exist! 

goto done 

:nextl : 

find /n "$2" $1 2222221 dd | 


if $3 — - goto done 
find /n "$3" 272271 >222222 
if $4 == - goto done 
find /n "%4" ZZZZZ2 »222223 
:done 
if $4 — - goto type2 
type 222223 
goto endb 
:type2 
if $3 — - goto typel 
“type 222222 
goto endb. 
itypel 
type 222221 
sendb 
echo Done with FINDMULT 
echo on 





when used with the batch file call 
A>findmult maillist.txt Smith WI Oak 


finds all lines containing “Smith,” determines which of these 
lines contain “WI,” then determines which of these lines 
contain “Oak,” finally printing only those lines containing 
all three text strings. 


Further Details about FINDMULT 

Since FINDMULT is a fairly long batch file, let’s look at 
it in more detail. First of all, FINDMULT finds up to three 
“subfields.” It searches first for all lines containing the first 
text string, creating a work file called 222221. It searches 
222221 for any second text string, creating another work 
file, 222222. It searches 222222 for any third text string, 
creating another work file, 222223. The last work file is then 
TYPEd. From one to three text strings can be used in the 
search — dashes are used in place of the strings if less than 


three strings are specified (F INDMULT Tandy - searches only 
for the string “Tandy,” for example). 

IF commands are used within the batch file to test to see 
if there are more text strings. IF %3 = = - goto done for 
example, causes a "jump" to location DONE if the third 
replaceable parameter (second string) is a dash in the call. 
A>findmult myfile.dat Tandy - would set %@ to 
myfile.dat, %1 to Tandy, %2 to - and %3 to -, for example. 

The GOTOs and labels (:next1, :done, : tupe2, : tupel, 
:endb) offer a way to actually change the flow of the batch 
file, depending upon the program parameters. 

Even though ECHO OFF disables a display of the batch file 
commands as they are executed, all of the text following 
an ECHO is displayed — a good reason for using ECHO instead 
of REM text, which is not displayed in the ECHO OFF case. 
Normal text for MS-DOS commands is displayed, however. 
A typical run of F INDMULT is shown in Listing 1. 


Repetitive Operations with FOR 

The batch FOR command is used to program repetitive 
operations in a batch file. In computerese, this type of 
operation is called an "iterative" operation, meaning that 
it has many iterations or passes. The format of FOR is FOR 
Xf IN (set) DO. . . anda typical (non-batch) command 
might be A>for &f in (*.com) do dir Xf. 

The %f variable is like a replaceable parameter for the 
FOR command. The expression within parentheses defines 
a set (generally) of files for which the operation after the 
DO is to be done. The command above reads, “For every 
file in *.com, do a directory listing," and the result is the 
same as the separate MS-DOS commands: 


PCM NEEDS REVIEWERS 


As PCM expands to bring Tandy MS-DOS 
and portable computer users all the best 
information, programs and reviews each 
month, our independent review staff must 
grow, too. Therefore, we invite you to join the 
elite fleet of PCM reviewers. 

You read PCM because you love your Tandy 
Computer, so if you want a creative outlet, a 
chance to examine quality software and have 
your observations published nationwide, we 
want to hear from you. 

Send us a cover letter with your name, 
address, occupation, list of equipment, areas 
of expertise and general interests. We look 
forward to your response. After all, we already 
see you have the best taste in computers. 


Reply to: Reviews Editor 
PCM 


The Falsoft Building 
P.O. Box 385 
Prospect, KY 40059 
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"RE MISSING OUT! 


Supercharge your Portable 100/200. 


isa 3-in-1 cross-referencing 
-software package with database 


| . management, spreadsheet and 
.. word processing. 


Information stored in Data 
j πει. the data base, can be 
—< s: by Data Calc, the 
| t program. The 
Word Pier allows you to 
rge Data Manager informa- 
into your text. Or you can 
ect any part of a Data Calc 
rksheet and add it to any 


i Word Processor. 























iC ve Solutions i is easy 
), because it's de- ` 
oe 







bels and menus make decision 


making easy. m He μον δη δες 


Expand your Tandy 200 The Technology Store" 
Add ROM-based power to A DIVISION OF TANDY CORPORATION 

make your Tandy 200 more ver- 

satile, too. With Multi-Solutios B Send me a new 

you get three powerful applica- Computer Catalog. 

tions: a word processor which ; 

allows formatting of any text bc ee Dap V d 

file; Time Minder, a calendar i; Fort Worth, TX 76102 | 

program that lets vou keep hires 

track of appointments; and |. Company 


Data Manager to help you man- 
age dates, addresses, invento- 
ries and more. 


Come in today! 
Supercharge vour portable 





today. Drop by vour nearest αφ at ado Shack Comput: Centers and at 
Radio Shack Computer Center! rciatg stores and dealers 


Itiplan/TM Microsoft | 


82518 SYS.COM 
A>DIR TREE.COM 
ñ>DIR RECOVER.COM 


The asterisk character, by the way, is a “wild card” 
character that replaces any group of characters. The 
expression *.com means “all files ending in a .com 
extension." The expression INVENT.* means all files with 
the name INVENT — INVENT.BAS, INVENT.DRT, INVENT 
sham, eto, 

Another wild card character is ?. It stands for “any text 
character in the position of the ?." The expression 
BILL??.DAT would include BILL@1.DAT, BILL@3.DAT, 
BILL1@.DAT, and BILLAA.DAT. 

The asterisk and question mark characters are used in 
many MS-DOS commands, and not just for batch file 
commands. 

When FOR is used in a batch file command, then the FOR 
variable must have two '€' characters. The command above 
in a batch file becomes: 


echo of f 
for 4%f in (*.com) do dir %%f 


The set of files enclosed by parentheses can be any 
number or group of files, even those specified by replaceable 
parameters in the batch file call: 


for %%f in (march.dat april.dat may.dat) dodir %%f 
(does directory listing for march.dat, april .dat, may.dat) 


for XXf in (X1 %2 %3) do dir %%f (if the batch file is 
called by DIRF march.dat april.dat may.dat does 
directory listing for the three files) 


The batch FOR command can be used in many useful 
batch operations. Take the following batch file. It’s called 
ONLYNEW and copies files from one drive to another, but only 
those files that do not already exist on the destination drive. 
A typical call would be A>onlynew a: b:, which would 
copy new files from the disk in Drive a: to the disk in Drive 


***ONLYNEW*** 
16 AsL — A goto error 
1f A32 — A goto error 
echo Copy only those source files not already on target drive. 
echo You have specified drive $1 files to be copied to drive 
echo 82. If this is correct, strike any key; if you've 
echo changed your mind, open the source drive door and press 
echo Ctrl followed by C. 
pause 
echo on ; 
for %%f in (*.*) do if not exist %2%%f copy %1%%f %2%% f 
goto done 
terror 
echo The format is ONLYNEW A: B:, etc. 
:done 


Note that in this batch file a check is first made whether 
the source and destination drives have been specified. The 
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expression if A%1 = = A is a roundabout way of testing 
whether or not the replaceable parameter %1 exists. If it does 
not exist, A%1 is equal to A, otherwise A%1 is equal to another 
string, such as %a:. 

The ECHO ON command is used to turn on the display so 
the current file specifications used are displayed. If this is 
not done, you'll only see the message 1 FILE(S) COPIED 
with no filename. 


Using More than Nine Parameters with SHIFT 

The batch SHIFT command permits more than nine 
replacement parameters (remember that the X0 replacement 
parameter is the name of the batch file). Its use is a little 
awkward, however, reminding us that the batch commands 
aren't a full-fledged computer language. Every time SHIFT 
is used, the X0 parameter is replaced by the %1 parameter, 
the %1 parameter is replaced by the %2 parameter and so 
on down the line, with the %9 parameter being replaced by 
nothing. 

An interesting batch file that uses SHIFT is shown the 
listing MEMO. It is a memo file builder that takes any text 
and appends it to a file called MEMO.TXT. (The append 
operation creates a new file if none was there before, or 
simply adds the text to the end of the file if there was existing 
text.) MEMO is a kind of super simple word processor. 

The batch file works like this: If MEMO alone is entered 
without parameters, then #1 is blank and A = = R1. In this 
case, if 40. txt (MEMO. TXT) exists, it is TYPEd, reproducing 
any previous text in MEMO.TXT. If the file does not exist, 
a Help message is displayed. 

If there is at least one word after MEMO (not A = = 8x1), 
the commands at START are executed. First, «1 through %9 
are sent to MEMO. TXT by an ECHO with redirection. Next, 
nine SHIF Ts are done, setting %1 through %9 to the next nine 
words of text, or nothing, if there are no more words. Next, 
&1 is tested to see if it contains text; if so, the commands 
at LOOP are executed. This loop and output continues until 
the last set of nine words have been sent to the MEMO. TXT 
file. Because of the limitation on the maximum MS-DOS 
command length, only about 27 words can be sent to the 
MEMO file, but more can be added by additional MEMO 
commands. 

MEMO is a handy way to jot down memos without having 
to load a word processor and go through an entire 
initialization sequence, Desk Mate notwithstanding. 





rem *%**MEMO*** 


echo OFF 

if not A = A%1 goto loop 

if not exist %%.txt goto none 
type $g.txt 

goto end 

none 

echo To use MEMO, enter Memo and up to nine words of text. 
goto end 

: loop 

echo $1 %2 $3 $4 %5 %6 87 %8 39 >> memo.txt 
shift 

shift 

shift 

shift 

shift 

shift 

shift 

shift 

shift 

if not A — A$1 goto loop 
rend 


When the text in MEMO is displayed, it is arranged as nine 
words per line, a fairly convenient line length. More text 
can be added by subsequent MEMDs. 


Setting a Parameter 

The last batch command is SET. SET is used to set a 
“global” variable (a variable available to all MS-DOS 
commands and programs) equal to a given character string. 
The variable can be used in batch files and changed with 
a single SET command, rather than changing many separate 
occurrences within all batch files. A simple example is this: 
Suppose you have a batch file to do a copy of all BASIC files 
on the diskette in Drive A: to a diskette in Drive B:. It looks 
like this: 


cls 

echo off 

echo ΧΧΚΓΠΡΥ FILES*** 
copy a:*.BAS b:*.BAS 


However, you would now like a batch file to copy all 
BASIC file copy: 


cls 

echo off 

echo ***DOPY FILES*** 
copy a:*.ASM b:*.ASM 


An alternative is to use a parameter such as f type: 


els 
echo off 


Personal Integrated Computers 
18013 SkyPark Circle, Ste. D., Irvine, CA 92714 


COMPARE PERFORMANCE 


Disk Drive $599.00 
30 Day Refund Guarantee 


wes. 


9 No applic. software 

e 100K storage per disk 
e 29K max file size 

e 40x& display 

e Not rechargeable 


e Lg. package software 
e 360K storage per disk 
@ 348K file size 

e GOx8 display 


e Rechargeable during use 
& powers your computer 


e OP system: (P/M 
Direct Disk Access 


e OP system: 
Load-Store Only 


NOW: VIDEO INTERFACE 
FREE BASIC INTERPRETER 


For catalog, 
1-800-421-6300 literature 1-714-261-0503 
Trademarks: Tandy, Tandy Corp; Cp/M-Digital Research 





echo X**xD0PY FILES**X 
copy a:*.*ftupes b:* 4f type% 


The parameter is set off by % signs bracketing the name, 
which may be any character string except one containing 
the characters zero through nine. This parameter is really 
a “dummy” parameter, which is replaced by text set during 
a SET command, as in: A>set ftype=ASM or A>set 
f type=BAS. After the SET command is executed, any batch 
file that refers to the named parameter has the dummy 
parameter replaced by the last SET command’s text. This 
sequence: 


R»set ftype=BAS 
A>COPYF 


will execute the batch file defined above as 


cls 

echo of f 

echo *xxDOPY FILES*** 
copy.a:*.BAS B:*.BR5 


This is a trivial case of the use of SET since the batch files 
are so short, but in longer batch files and sequences of batch 
files with many occurrences of elements such as current 
drive specifiers and filenames to be used, SET can save a 
great deal of retyping and duplication of batch files. The 
same batch file can now work for a backup of Drive A to 
B ora backup of Drive C to A, depending upon the contents 
of a variable determined by SET. 





WORD PROCESSING 
TRAINING GUIDE for 
IBM-PC and TRS-80 


Become an expert in the advanced word processing 
techniques in just a few hours. Develop skills that can 
be applied to any of the best selling word processors, 
no matter which system you decide to buy. Includes 
program disk so you learn quickly by doing. The train- 
ing guide and training program disk (a $50.00 value) 
will be sent to you absolutely free, with no obligation, 
upon receipt of this filled out coupon. Offer good for 
a limited time. 
παι πα I EYE πππ s πα αι s πα η LJ 
LeScript Word Processing Systems 
P.O. Box 361136, Melbourne, FL 32936 
(or call 1-305-259-9397) 
Type of computer system: 
D IBM-PC/XT/AT/PC jr 
D TANDY-2000 
o TANDY-1200 


o TANDY-1000 
O TRS-80 1/3/4/4P 
o TRS-80 2/12/16 








Address 





City State Zip 





Telephone 


"(Computer names are tradenames and/or trademarks of their respective 
manufacturers.) 
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Batch and MS-DOS Hints and Tricks 

The descriptions mentioned here serve as an introduction 
to batch files in MS-DOS. The more you work with these 
creatures, though, the more little hints and tricks you will 
find. Here are some samples. 


Sounding a Beep in Batch 

Want to sound a beep at the end of a batch run, or after 
each separate batch operation? The BEL (bell) code in 
ASCII is a decimal seven, which is not generated from the 
keyboard by entering a ‘7’, but by pressing the CTRL 
key, followed by the *G' key. This sequence generates a single 
character file that beeps when TYPEd: 


A>copy con: beep 
<G<Z 


The CTRL ‘Z’ keys terminate the keyboard input. The BEL 
code and other "control codes" can also be generated by 
certain word processors that allow embedded control codes, 
such as My Word. 

Sound the beep by using this line anywhere in the batch 
file: type beep 


Providing a Simple Response to a Program 

When batch files invoke programs that need keyboard 
responses, it is possible to generate an uncomplicated 
sequence from a disk file by using redirection of input. The 
simplest case of this is just a "press any key" response for 
such utilities as FORMAT and DISKCOPY. As in the case of 
the beep file, generate a file containing a carriage return and 
an Ν᾽ (for a Format another (Y/N) type message) by 


A>copy con: crn (press ENTER) N<Z (press ENTER) 


When executing a program that needs a response from 
the batch file, do FORMAT A: > crn to automatically send 
a carriage return and *N' to the FORMAT (or other) prompt. 


Providing a Series of Responses to a Program 

The same idea can be used for more complicated 
responses — put the pre-canned responses in a file created 
from the keyboard or word processor. However, it's easy 
to get bogged down in complicated responses that may 
cause a batch file to *bomb out." 


Interfacing to BASIC Programs 

Batch files can be used to run complete BASIC programs 
if the proper files are set up beforehand for responses to 
questions in the program. Generally, this works best for 
simple programs where the responses are known before- 
hand. Here's a sample: The BASIC program below sets 
boldface printing on a Radio Shack DMP-2100 printer: 


100 LPRINT CHR$(27) ;CHRS(31) 


Not too complicated, huh? No response is required. To 
run this from batch, one “redirect” file is required as shown 
here, called RUNBAS1: 


run "a:basicl^ 
sustem 


This file simply runs the prdefined BASIC program and 
then enters a SYSTEM command to return to MS-DOS. 
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The batch file to run the BASIC program looks like this: 


c: 
cd\dos 

basic < az: runbasl 
a: 


This batch file first sets the current drive to C:, then 
changes the subdirectory and loads BASIC from the 
subdirectory, redirecting the input to BASIC from file 
R:RUNBRS1. After A: RUNBAS1 returns to MS-DOS, the A: 
command in the batch file resets the current drive. This is 
a simple case, but the same basic sequence can be followed 
for much more elaborate BASIC files — and don’t forget the 
system functions that can be done from within a BASIC 
program involving directories, subdirectories and printing. 


A Date/Time Marker 

If you have an MS-DOS system with a clock/ calendar 
option, or enter the time manually, then this batch file can 
provide a date/time heading for files or listings. To use the 
file enter either DATETIME filespec or DATETIME prn ^ 
DATETIME PRN. 

The batch file prints out the current date and time at the 
current print position of the printer if PRN or prn is specified 
as the file. It appends the current date and time to the end 
of an existing disk file. If the disk file does not exist, nothing 
is done. 





This batch file uses a file called CR consisting of one 
ENTER character (COPY CON: CR; ENTER; F6 ENTER) to 
provide the carriage return for the Enter neu date/time: 
prompt on the DRTE and TIME command. The current date 
and time are first written to working file 222221. Next, the 
FIND utility is used to delete the Enter neu date/time: 
messages from ZZZZZ1 and to create the 222222 file. 

Depending upon the file type, printer or disk file, the 
222222 file is then sent to the printer or appended onto the 
end of an existing disk file by a COPY command. 


Date/Time Marker on Files 

The current date and time can be changed in a directory 
entry for a file by the simple batch file: copy 1%+, , 7B. Use 
a command line such as NEWDT MYF ILE. 


General MORE Driver 

We described the operation of the MORE MS-DOS 
command in the last column, but didn't provide a general 
form for printing any ASCII (text) file with pauses between 
screen pages. Here's the general form for a batch file called 
TMORE: 








Wondering where to grow? 


Why not get IBM compatibility with 
Tandy's 1200, or the new 3000, and 
take your OS-9 programs with you? 


TLM's PC68K puts the 68000/68010 
processor and Microware's OS-9 
together in any IBM, or compatible, 
PC/XT/ AT system, providing the 
best of both worlds with fully 
concurrent PC/68000 operation. 


e Powerful languages such as 
BASICO9, PASCAL and C 

e DYNACALC for spread sheet 
processing 

e The power of the 68000/68010 
e The price/performance and 
flexibility of the Tandy 1200 
and 3000 

TLM's PC68K. ..A great family 
to eme bed with! 


να js regis 
om ak 
68000 MK. 


al Business Machines. 


UNIX isa registered trademark Οἱ ATAT 


TL 


West: 4704 W. Jennifer, Suite 105, Fresno, CA 93711 209/276-2345 





CLOCK SPEED 
8/10/12.5 MHZ 
Without wait states 


HARDWARE 

2 Parallel Ports 

3-9 Serial Ports 

68881 Floating point co-processor 
(optional) 

Memory mapped dual port bus for 
high speed DMA transfers 

Real time clock with battery 
backup 

Up to 16 boards can run con- 
currently from one AT/XT/PC bus 

MEMORY 

1-2 MB OF RAM 

(1 MB on board standard) 

8K-32K of ROM 

2K-8K of battery backed RAM 

MULTI-USER 

3-9 users (3 standard) 

High speed “Tick” timer with 10ms 
accuracy for efficient multi-user 
time slicing. 


systems 


OPERATING SYSTEMS 

OS-9 (Multi-user UNIX look-alike) 

C/PM-68K (popular single user OS) 

Both support concurrent access 
to PC DOS 


SOFTWARE 

Software selectable OS 
environment 

IBM Color/Mono Graphics Support 

Local and Global disk caching for 
maximum speed and efficient 
data transfer 

COMMUNICATIONS 

Powerful asynchronous/ 
synchronous data 
communications capability 

Bisynchronous SNA 3270, X.25, etc. 

MISCELLANEOUS FEATURES 

Remote and Local reset (hardware 
or software selectable) 

Remote and Local Non-maskable 
Interrupts (NMI) 

Stand alone hardware capability 
(without AT/XT/PC support) 


/ East: 67 Grandview Avenue, Pleasantville, NY 10570 914/747-1450 


***TYPE WITH MOREX 
Types any file with ---More--- 


Syntax: THORE NR 
type 81 | more 1 
echo on 





Entering A>tmore columnl.txt for example, TYPEs 
COLUMN1.TXT a screen at a time, then pauses with the 
message - - More - -, allowing you to read the screen before 
getting the next segment by a key press. 


Changing the MS-DOS Prompt 

Tired of the same dreary >A for an MS-DOS prompt? 
The PROMPT command in MS-DOS allows you to change 
the prompt to any text you'd like. Aprompt You Rang?, for 
example, changes the prompt to You Rang? every time the 
MS-DOS prompt message appears. To reset the normal 
default drive letter, enter prompt without any text. 


You Rang? prampt 
A> 


If you would like trailing spaces before user command 
text to be entered (the space between the You Rang? and 
prompt in the above example), include these in the prompt 
message you enter. 

The PROMPT command can also use a coded string 
variable to create a prompt message from system parame- 
ters. These codes are used: 


Protect Your Valuable 
PCM Coleen With... 


DISTINCTIVE AND DURABLE 
PCM BINDERS 


YES. Please send me 


s'earriage return line feed 
b | character. 
d current date | 
Escape character 
$g > eharaeter | 
‘Shiv sean ltt character 





$t current. ‘time n 
| version number REIHE 





When used with a batch file, complis sequences of 
prompts can be predefined for easy loading. Here’s an 
example: 





This sequence produces a prompt similar to the following, 
each time MS- DOSi is invoked: 


i Curren: date = Fri | is 17 1986 
Time = es 18: 18. 51. i 
MARN 





There are plenty of other neat tricks that can be done with 
batch files and utility programs in MS-DOS on the Tandy 
1000, 1200, 2000 and 3000. If you have a favorite batch file 
that you think others might be able to use, send it on to 
me for inclusion in future columns, either in care of PCM 
or P.O. Box 3568, Mission Viejo, CA 92692. [PCM] 


hese distinctive brown binders not only ensure that your 

magazines stay in mint condition, but they showcase your 
collection as well. Each binder is clearly embossed with the 
magazine's name in gold lettering on both the front and 
the spine. They're a handsome addition to any decor. 


Each of these handsome binders holds 12 issues of PCM 
and is only $7.50 (please add $2.50 for shipping and handling 
for each binder ordered). 


SPECIAL DISCOUNTS ON PAST ISSUES WITH THIS OFFER 


If you place an order for six or more back issues of PCM 
at the same time you order your binder(s), you are entitled 
to $1 off each back issue of the magazine, which normally 
sell for the single issue cover price. For an index to our 
back issues, and an order form, please refer to our "Back 
Issue Information" page (check Table of Contents under 
departmental listings). 


— sets of binders at $7.50 each (plus $2.50 shipping and handling for each binder ordered). 


If your order is to be sent via U.S. Mail to a post office box or to another country, please add $2. Kentucky residents 


add 5 percent sales tax. 


I also want to take advantage of the special savings of $1 off the single issue cover price for back issues with the 
purchase of a binder. (An order form from a recent issue indicating the back issues you wish to receive should accompany 


this order.) 


Name 





Address 


City 


State. —. "ZIP 








My check in the amount of 
Charge to: DO VISA O MasterCard O American Express 


Account Number 


is enclosed. (In order to hold down costs, we do not bill.) 


Expiration Date 





Signature 





Mail to: P.O. Box 385, Prospect, KY 40059. 
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Integrated Desk 


Tips, T 


By Bobby Ballard 


I’ve received letters from all parts of the country with 

questions, suggestions and advice. I want to take this 
opportunity to, first of all, thank you all for writing. And, 
I want to share some of the tips, tricks and advice I've 
received. 

Some of the letters contained complaints or disappoint- 
ments about the lack of features found in Desk Mate. I want 
to emphasize again that Desk Mate is really not intended 
to be an end-all program suitable for everyone. If you have 
very specific and powerful needs in one area or another, you 
might wish to consider buying a specific application 
program and use the balance of Desk Mate to handle the 
infrequent or light-duty tasks you must accomplish. 

With that said, let's get on to the rest of the mail. Guido 
J. Gallo wrote from Illinois to tell me about a problem in 
the Worksheet section on the Tandy 1000. He found it while 
trying to use the example in Chapter 6 of the tutorial on 
amortization. I duplicated his process and found the same 
problem. Mr. Gallo was trying to amortize a loan over 30 
months; he could only get a maximum of 23 to work 
properly. 

At first, I thought maybe the problem was due to the fact 
that the table is only designed to handle 12 months. 
However, Mr. Gallo sent in examples that proved this wasn't 
the problem. He had redesigned the worksheet to handle 
up to 30 months. I then designed a worksheet that should 
have amortized an amount over 60 months or five years. 
I ran into the same problem at that point. Anytime I entered 
an amount over 23 for the number of periods, I got an 
OVERROR printed in a massive number of cells. This problem 
seems to be well-documented at Tandy since several wrote 
to me describing it and indicating that they had informed 
Tandy as well. 

I contacted Tandy to see if they had a solution for this 


S starting *The Integrated Desk" series in PCM, 


problem and was informed that they don't consider this to 


Bobby Ballard is a free-lance writer and the owner of 
a computer software and consulting firm. He also 
operates a BBS in Brooklyn. Bobby can be contacted 
at 1207 Eighth Avenue, Apt. 4R, Brooklyn, NY 11215. 





1000/ 1200/ 2000/ 3000 






ks and Letters 


be a bug, but a limitation of Desk Mate's design. So the 
ability to enter an amount over 23, for amortizing, is not 
possible and is not a planned fix. If anyone knows of a way 
to get around this, I would like to hear from you so the 
solution can be shared with everyone. If anyone passes on 
a solution I will let everyone know immediately on Delphi, 
and as soon as possible here in the column. 

One other source of confusion pointed out by a couple 
of readers concerns the use of the SHIFT PRINT function in 
the Tandy 1000 version. In Desk Mate you have the option 
of printing a screen dump or a file. The SHIFT PRINT 
function is used to do a screen dump. When invoked, it 
prints everything on the video screen including the menus, 
time and date, and prompts; everything. If you want to 
quickly get a printout of only one record in Filer or just 
a small section of text in the Text section, then SHIFT PRINT 
is a good choice to use. 

However, if you want to print a file or entire document, 
you must use the print function. The print function can be 
invoked in two ways: on the menu, when it's available, at 
the bottom of the screen, or by pressing the PRINT key on 
some models or the PRT SCR key on other models. Also, 
make sure you have previously set the print parameters 
correctly by using the ALT F6 function from the main menu. 

I also heard from someone who was having trouble 
printing on legal paper (8.5 inches wide by 14 inches long). 
I tried this and had no problem. You must remember to set 
the printer parameters using the ALT F6 key. I successfully 
accomplished legal-size printing by setting the number of 
lines per page to 84 and the number of printed lines per page 
to 78. The first number is arrived at by adding 66, the 
number of lines on letter size paper to the added number 
of lines for legal, which is 18. There are normally six lines 
to an inch, so I multiplied six by the three additional inches 
for a total of 18. That gives a total of 84. I then took off 
six for two margins of three lines each. This left 78, the 
second number, for printed lines per page. 

This same letter indicated the user was having problems 
with blank lines that weren't on the screen periodically 
showing up on a printout. To avoid this, you must make 
sure the screen format, the F4 key in Text, is set the same 
as the printer parameters using ALT F6. If you have lines 
longer than the printer margins are set, you will also get 
a wrap-around of text that causes blank lines or half-full 
lines of text to appear in the printout. Make sure your 
printer and printer settings in Desk Mate and the actual file 
all have the same format. This should take care of blank 
lines and more. 

Speaking of printers, keep this tip in mind. If you wish 
to have your printer configured a certain way each time 
Desk Mate is booted, make sure you exit Desk Mate with 






the settings you want already selected. Then use the F12 key 


April 1986 PCM 49 


Í TANDY GOO ema m Coon Ya em J 





A breakthrough in portable 
computing power and versatility. 


Get a portable that matches the per- 
formance of a desktop computer. The 
amazing Tandy 600 features a 16-bit mi- 
croprocessor, an 80-character by 16-line 
display, a built-in 31/2” disk drive that 
stores 360K of data and 32K RAM (ex- 
pandable to 224K*), 


Five resident applications 

With the Tandy 600’s larger display 
and expanded memory, Multiplan 
spreadsheet analysis can hold more in- 
formation. Word processing is as easy as 
using MS-Word. You'll have quicker ac- 
cess to documents, and better storage 
with the built-in disk drive. File is an 
electronic data base for names and ad- 
dresses, expenses, client billing, inven- 
tory and more. And you can keep a 
large number of different files on the 
pocket-size diskettes. With Telecom and 


the Tandy 600’s built-in modem, you’re 
able to communicate with other com- 
puters over phone lines and access na- 
tional information networks. Telecom 
will even dial the phone number of any- 
one listed in the File program. Calendar 
helps you keep track of your daily tasks 
and activities. 


The easy-to-learn resident System 
Manager lets you run each application, 
exchange information between applica- 
tions and manage the files created. And 
you can add BASIC/ROM (26-3904, 
$129.95) to write your own programs. 


Tandy . . . Clearly Superior” 


If you’ve been looking at portable 
computers, compare them with the 
Tandy 600 (26-3901, $1599). You'll be 
amazed at what it can do! 





Available at over 1200 
Radio Shack Computer Centers and at 
participating Radio Shack stores and dealers. 


® 


A DIVISION OF TANDY CORPORATION 


Send me a free 8 
Tandy 600 brochure. 


Radio Shack, Dept. 86-A-1127 
300 One Tandy Center 
Fort Worth, TX 76102 


Name 


Company 


Address 
City 
State 
Zip 
Phone 


K. — = = m = m dll 





* RAM upgrades are in banks of 96K (26-3910, $399.95 each). Prices apply at Radio Shack Computer Centers and participating stores and dealers. Multiplan and MS-Word/TM Microsoft Corp 


to exit back to DOS. If you don’t wish to save the current 
settings for the printer, use the SHIFT ΕΙ2 to exit. This 
preserves your version of Desk Mate as it first booted. This 
is true of the screen colors, too. 


A Tip for a Mouse 

If you have the Tandy Digital Mouse installed on your 
system and find that the Telecom function will not work 
properly, then you have to change the way you boot 
Desk Mate. Apparently the mouse driver software affects 
Desk Mate, particularly in the Telecom section. Tandy is 
aware of this problem and is working to fix the bugs. The 
fix will probably involve changes in the MOUSE.SYS 
software instead of Desk Mate, according to a spokesperson 
at Tandy. 

To avoid this problem involves some choices on your part, 
at least until the fix is released. You can boot Desk Mate 
without the mouse driver as part of the CONFIG.SYS file. 
This, of course, means you won't have access to the 
hardware clock on the mouse controller board. This is due 
to the fact that the mouse driver (MOUSE.SYS) must be 
installed and executed in order to install and execute the 
clock software. 

Another solution to this problem is to get a second clock 
on your next board and use the software for that clock at 
all times. You can then set up a bootable copy of Desk Mate 
that does not include the mouse driver software. This is the 
way my system is configured and it works well. I use the 
mouse board just for the mouse and use the clock on a 
multifunction board as my timepiece. 

Anyway, it's up to you as to what route to go in solving 
this problem. The least expensive solution is to boot without 
the MDUSE.SYS software installed. But if you're adding 
another board soon, a clock is available on many and adds 
little to the overall costs. 

While we're covering communications and hardware, let 
me remind you that Desk Mate only works on COM Port 
1 of your MS-DOS computer. When adding COM Ports, 
make sure you leave your modem configured or attached 
to COM Port | or else DeskMate won't run at all in 
Telecom. 


Worksheet Help 

Richard Wagner wrote a long letter from Oregon with 
several observations and a question on using the spread- 
sheet section. He writes, “I would like to take a column of 
my prices and add or subtract a specific amount from every 
item in the column, say 50 cents or $1.25. Can anything be 
done?” 

To do this, you might set up a column of formulas, using 
the formula and select functions, that adds the amount from 
an input prompt. Use the formula function to define a cell 
as ?INPUT, then add the amount to an entire column. This 
should allow you to add a specific amount at anytime. 

Again, if anyone knows of a better way to solve this 
problem for Mr. Wagner, please let all of us know. In the 
near future, I will cover the Worksheet function in more 
detail. 

Mr. Wagner also writes, “Can’t figure out how to 
underline. . .” This becomes a problem without the ability 
to embed printer codes in Text or other functions. 
Underlining takes place by sending special escape codes to 
the printer to turn underlining on and off. Desk Mate, at 
least on the Tandy 1000, does not support embedded printer 
codes, so underlining is difficult if not impractical. You 








could turn the underline on from the DOS command level 
before entering Desk Mate, but then everything will be 
underlined. 

Several readers have asked about the slow movement in 
the Worksheet section while going from one column to 
another or scrolling to the end of a large spreadsheet. This 
may not be a problem on the versions that run on faster 
machines like the Tandy 2000 or Tandy 3000. The 1000 has 
a slower clock speed so the program runs slower. Don’t 
forget, though, that using SHIFT or CTRL along with the 
arrow keys jumps you around in the spreadsheet much 
faster. To move a screen at a time, use SHIFT and the arrow 
keys and to jump from the first column/row to the last 
column/row using the CTRL and arrow keys. 

While we're on the subject of Worksheet, I have one other 
small solution to a problem with using large spreadsheets. 
Several have asked about not being able to know or see the 
row or column name while out in the middle of the sheet. 
One guy said he just wrote the names down on paper before 
moving about. If you have a printer, you could use the SHIFT 
PRINT function discussed earlier to get a quick printout of 
column or row names. Another solution that might work 
is to embed names of the column and rows somewhere in 
the spreadsheet. You could make additional title cells for 
working in the spreadsheet and delete them before printing. 
It would leave a blank row or column in the sheet, but this 
might not matter on some occasions when just getting the 
job done is more important. 

I also have a report on two bugs from Tandy Towers and 
they assure me they are working to fix the following two 
problems. (These are to be fixed in the next version and have 
been confirmed by Tandy.) Both of these bugs are in the 
Worksheet section of Desk Mate. The first one concerns 
setting up a formula that raises a negative number to a given 
power. Currently this process returns a one (1) instead of 
the correct answer. I haven’t been able to think of a way 
around this until the new version arrives. 

The second bug concerns the way in which F10 inserts in 
the Worksheet. The F10 key presently moves the data up, 
above the insert, and replaces the figures in the cells. This 
will also be fixed in the next version. 


Merging Mail 

I've had several people ask me how to get Desk Mate (on 
a 1000) to do a mail merge between Filer and Text. I had 
to inform them that I knew of no way to accomplish this 
task. The problem stems from the inability of Desk Mate 
to handle variable fields in the Text section, and the 
additional programming it would take to pull information 
from the Filer section and move it to Text automatically. 

It is easy to move a single block of data and the tutorial 
gives a pretty complete explanation. It must be done 
manually, however, and if you need to handle a large 
mailing it is impractical. It would be nice to know someone 
is working to make Desk Mate do a mail merge, but I've 
not heard anything so far. 


The Wrap Up 

I hope this information has been helpful or, even better, 
helped you solve a problem you have been experiencing. If 
you have any other questions, problems or fixes, just write 
me at 1207 Eighth Avenue, Brooklyn, NY 11215 or for 
quicker help and response, contact me on Delphi in the MS- 
DOS special interest group. Address mail on Delphi to my 
user name, BOBBYBALLARD. PCM] 
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Discover a Whole New World 
of TV Entertainment! 












User Installable! Over 100 Channels! 
Uncut Movies! Specials! Sports! 
News! Weather! Music Videos! 


ee, $1519 


m Totally Automatic System With 81/2 -Ft. 
Dish, Receiver and Wireless Remote Control 


m Comes With All Accessories Needed for 
Complete Do-it-Yourself Installation 


m Descrambler Ready 



















U.L. 
Approved 







Handy Wireless Remote Lets You Change 
Channels, Control Volume and Fine-Tune 





























Now you can enjoy it all! 24-hour non-stop entertain- ^ grams, plus music videos, FM broadcasts and movies 
ment that you simply can't get from local TV, cable, and with provision for stereo, and 24-hour news coverage 
even video tape! You'll see the hottest stars, recentun- on both TV and radio. It all adds up to out-of-this-world 
cut and uninterrupted movies, the ultimate in sports TV viewing at a down-to-earth price. Come in today and 
coverage—and the best part is, there are no monthly discover how easy it is to enjoy satellite programming! 
fees to pay. You'll see exciting family-oriented pro- Includes complete installation manual. 









(817) 825-4027 


NOCONA ELECTRONICS « Box593 * Nocona,TX76255 


UPS Shipping 


ML Delphi Bureau 


steam over the past month. Membership is now well over 

2,000, with as many as 100 members accessing the SIG 
on a single day. And even better, more and more knowledgeable 
Tandy users are taking the time to participate, share their 
programs and help others with answers and advice. 

The databases are beginning to fill with public domain and 
user-supported, or "freeware," programs. There are many 
excellent utilities, full-featured terminal programs, games, 
home and business programs and programming aids. If you 
are not familiar with user-supported software, these are 
market-quality programs, distributed freely by the producers 
with a note asking for a small donation if you like and use the 
software. It is a great marketing concept, giving you the chance 
to use a program before paying for it and also saving you the 
tremendous distribution costs tacked onto conventionally 
distributed software products. 

Regretfully, Delphi has instituted an hourly rate hike, 
effective March 3. The basic rate for evening and weekend 
hours, previously $6, will increase to $7.20 an hour for 
mainland U.S. and Canadian members who access via Uninet 
and Tymnet. The prime daytime rate will increase from $16 
an hour to $17.40. 

Other rates apply for Hawaii, Alaska, Puerto Rico and 
international users. More information about these may be 
obtained online in the MS-DOS SIG or by calling Delphi at 
1-800-544-4005. 


T* Delphi MS-DOS SIG has really been picking up 


There is some good news regarding rates on the horizon, 
however. Beginning March 3, Delphi will levy no extra charge 
for 2400 Baud access. Other online services charge premium 
fees for access at higher speeds, some as much as two or three 
times their standard rates. Also, they are beginning a value- 
packed membership plan called *The Delphi Advantage" 
which offers lower access rates, free manuals and command 
cards, a newsletter and other benefits. In exchange, members 
agree to use, essentially, six hours of online time each month 
at a guaranteed $6 an hour basic rate. 

Other good news involves enhancements in the Delphi 
software. Commands and features are constantly being added 
to make the system more flexible, powerful and user-friendly. 
Support for the Kermit file transfer protocol has recently been 
added to the workspace area and should soon be available in 
the open databases. This offers several advantages over 
Xmodem, including greater reliability of data transfer, multiple 
file transfers, and seven-bit transfers rather than eight (which 
should be a boon to our Canadian members who access 
through the seven-bit Datapac network). 

At any rate, if you haven't joined us in the MS-DOS SIG 
by this time, I hope you will soon. Telecommunications is one 
of the most interesting and exciting things you can do with your 
computer. At the risk of sounding trite, I have to say it: There 
really is a whole world out there waiting. 


By Kevin Nickols 
MS-DOS SIG Manager 





LOW LOW PRICES 
on 
Hard Disk Drives 


Floppy Disk Drives 
Star Printers 
Anchor Modems 
Diskettes 
Color Computer Dr Ø 
SPECIAL 


IBM XT COMPATIBLE 
2 FLOPPY DRIVES 
1 10 MEG HARD DISK 
MONOCHROME OR COLOR CARD 
256K MEMORY EXPANDIBLE TO 640K 
$1195.00 
catt us τουαγμ/617-278-6555 oeren INQUIRIES INVITED. 


ORDER TOLL FREE 1-800-635-0300 617-278-6555 


TRUE DATA PRODUCTS 
9 South Main We weicome 
URDU Maes. 01569 Visa /Master Charge το — 
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Submitting Material To PCM 


Contributions to PCM. are welcome from eve- 
ryone. We like to run a variety of programs that 
will be useful/ helpful/ fun for other Tandy Portable 
and MS-DOS computer owners, We now support 
the Tandy portable models 100, 200 and 600 and 
the Tandy 1000, 1200, 2000 and 3000 MS-DOS 
computers. 

Program submissions must be on tape or disk, 
and it is best to make several saves, at least one of 
them in ASCII format. We're sorry, but we do not 
have time to key in programs. All programs should 
be supported by some editorial commentary 
explaining how the program works. Generally, 
we're much more interested in how your submis- 
sion works and runs than how you developed it. 
Programs should be learning experiences. I 

Pay for submissions is based on a number of 
criteria. The rate of remuneration will be estab- 
lished and agreed upon prior to ‘publication. | 

For the benefit of those who wish more detailed 
information on making submissions, please send an 
SASE to; Submissions Editor, PCM, The Falsoft 
Building, P.O. Box 385, Prospect, KY 40059. We 
will send you comprehensive guidelines. 

Please do not submit programs or articles 
currently submitted to another publication: 

If you feel qualified to review software and/or 
hardware products for computers covered in PCM, 
send us your name, address and phone number; we 
will send you a questionnaire form and a copy of 
our reviewer guidelines. 
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MET Feature 


By Michael J. Himowitz 

et your messa TOS ji Pan AOE rt 2 BEATE 
9 σ f TON - ER GR ON he modern dot-matrix printer is a flexible and useful 
in a bold way with this banner maker 





tool. It's also a great toy. If you're willing to spend 

some time fooling with it, you can entertain yourself, 
your family and friends — and learn something about 
programming in the process. 

When I first got my Gemini printer, I fell in love with 
its block graphics capabilities. Being a newspaperman by 
trade, I thought it would be fun to use the printer as a 
typesetter of sorts, using those graphics to produce headline 
type. 

The result was Bigprint. The versions here run on any 
Tandy 1000 or compatible and the Model 100/200 (24K 
minimum on the Model 100). The program prints title pages 
and report covers in large block letters of almost infinite 
variety, depending on the capabilities of your printer and 
your imagination. It also mixes lines of block letters with 
lines of standard printing, centering each line on the page. 

In normal mode, it produces six block characters per line 
on a standard nine-inch printer. If you have a 15-inch printer 
or use condensed (16 or 17 cpi) type, you can get up to 10 
characters per line. Lines printed in normal type may have 
up to 72 characters. The block characters are created on a 
grid 11 spaces wide and eight spaces deep. Because printed 
letters are taller than they are wide and because there is 
space between each line, the Bigprint character still has a 
vertical appearance. 

The appearance can be altered in two ways. First, each 
block character is composed by default of X's and spaces. 

| The program allows you to change the ‘X’ to any character 
| your printer will produce. This gives the characters an 
| astounding variety of textures. In the Model 1000 version, 
| you may use a different component character for each line 
| ofthe Bigprint message. The Model 100/200 version uses 





Mike Himowitz is system editor for the Baltimore 
Evening Sun, proprietor of Federal Hill Software and 
author of numerous programs. He lives in Baltimore 
with his wife, two children and six computers. He 
loves them in that order. 
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100/ 200/1000/1200/2000/3000 


RINT 


the same component character throughout, although it 
could easily be modified. 

Second, the height/ width ratio may be varied by 
changing the length of the line feed (if your printer allows 
this). If you make the line feeds small enough and use a solid 
block graphics character, you can produce solid type. The 
program allows you to send these kinds of commands 
directly to the printer. 

From a progamming standpoint, Bigprint illustrates the 
portability of Microsoft BASIC. The original Bigprint was 
written for the TRS-80 Color Computer. The problem with 
that machine is its 32-character display, which makes it 
impossible to preview Bigprint output on the screen. When 
I got my first MS-DOS machine with its 80-column display, 
I saw the opportunity to change that. As a result, the 
program has a screen display option that you can use as 
an attractive titling subroutine in other programs. 

Because the Color Computer uses a subset of the GW- 
BASIC used by the Tandy, IBM and compatibles, the 
conversion was straightforward. The only hassle was 
making sure that lowercase input on the Tandy 1000 would 
be treated the same as uppercase input. The Color Com- 
puter normally does not use lowercase, so there is a routine 
to convert lowercase to uppercase. 

This version incorporates three major improvements over 
my first MS-DOS version, which ran on a Sanyo 555. First, 
there is a “bounce-bar” menu invented by Frank R. Neal 
of Columbus, Ohio, which I found on the CompuServe 
Information Service. Second, I have added a routine that 
allows you to save a Bigprint file to disk. The file may then 
be copied to a printer in DOS with the Copu and/or Print 
commands or read into a word processor. Finally, I have 
added a routine allowing you to set a different component 
character for each line. 

The Model 100/200 version doesn't have the fancy screen 
preview or as many bells and whistles as the Model 1000 
program, but it does the trick. Interestingly enough, the 
Model 100/200 version runs on the Tandy 1000 with only 
one modification, the addition of the following line: 
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TANDY IS DANDY... 


...until you want more memory 


Your Tandy 1000 is a good machine. 
A lot of computer for the money. 


But you need to add more memory to 
get the best performance possible. 
Tandy wants a lot of money for that. 
Too much money. 


Now there's another way to upgrade 
your memory. The Zuckerboard 
Expansion Memory card. A high 
quality, reliable board at a very 
reasonable price. 


So, if you want to get the most out of 
your computer, you have a choice. 


You can go to Tandy, and Tandy will 
get the most out of you. 


Or, you can come to us. We'll fill up 
your computer without emptying 
your wallet. 


Dr. Dr. Zucker 


it’s another 


ZLUCKERRS 








Zuckerboard 
Expansion 
















Board 
Configuration 


Tandy 
Memory Plus 





with 256K 
with 512K 
Clock Option 
Warranty 


$319.95 
$519.90 
5 99.95* 
90 Days 


*with mouse 
















INTRODUCTORY OFFER 


Send the ZUCKERBOARDS I need for my TANDY 1000 right 
away. 


Here's my check O or money order O 
MADE PAYABLE TO A.T.D. 


— _ EM with 256K @ $109 = |... Subtotal 

— _ EM with 512K @ $149 = . CA residents 

The Doctor pays the shipping Amount 
Enclosed 

NAME 

ADDRESS 

μυ. YR ELSE RATE 2 

TELEPHONE ( ) 


A.T.D. 1287 Lawrence Station Rd., Sunnyvale, CA 94089 


' Ἴ 
' ' 
' I 
1 ' 
' ' 
I i 
1 ' 
' ' 
' ' 
' ' 
I ' 
1 ' 
' ' 
1 ' 
' add’ TH tart I 
' 

' ' 
I ' 
' t 
1 1 
' ' 
' ' 
if 1 
' ' 
' ' 
' ' 
' ' 
1 ' 
' ' 


CALL TOLL-FREE TO ORDER 
CA (800) 458-6200 
(800) 624-4920 






Θ TB 1287 Lawrence Station Road ο Sunnyvale, CA 94089 » (408) 734-4631 


ZUCKERBOARD is a Trademark of Advanced Transducer Devices, Inc. 
Tandy 1000/1200 are Trademarks of Radio Shack, a Division of Tandy Corporation. 
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This is a tribute to the consistency of Microsoft BASIC. 
If you don't feel like typing in the entire Tandy listing, you 
can use the Model 100/200 version and get good results with 
a lot less work. 

When the program is run, you see a menu with three 
choices. They are: 


1. Set Printer Commands 
2. Enter Bigprint Message 
3. Set Block Character 


On the Model 1000 version, the cursor keys can be used 
to position the bounce-bar over your choice and press 
RETURN, or merely type in the number of your choice. 

Option | allows you to send a string of commands to the 
printer. Use this to set condensed type (for 10 characters per 
line), change the line feed length, or create boldface or italic 
type. The commands are in the form of ASCII decimal 
control or escape codes. 

Enter one code per line. For example, on my Gemini-10X, 
the code for condensed type is 15. The codes to reduce the 
line feed to 1/10 of an inch are 27, 51 and 10. Using Bigprint, 
I type 15 on Command Line 1 and press the RETURN key. 
On Command Line 2, I type 27 and press RETURN. On 
Command Line 3, I type 51, and so on. 

Make sure your printer is online when you do this because 
the codes are sent to the printer immediately, producing a 
single line feed. The paper should be set so the print head 
is close to the top of a page. 

When you are through entering commands, just press the 
RETURN key with no other input at the Command Line 
prompt. Your codes are displayed and you are asked if they 
are correct. If they are, enter Y. Any other response repeats 
the printer command process. 

You are then asked to enter the codes that restore normal 
printing. This allows you to enter lines of standard type. 
The procedure is the same as for the first series of 
commands. The command code sequence for normal type 
on the Gemini, Epson and similar printers is 27 and 64. 
Check your printer manual for details. Once you have set 
the commands, you return to the main menu. 

Option 3 allows you to change the character that makes 
up the Bigprint letters. When prompted, just type in the 
ASCII code of the character desired. The permissible range 
is 33 to 254. Get these codes from the printer manual, not 
the computer manual, because the non-alphabetic character 
sets on all devices are different. The default is the character 
X, which has an ASCII code of 88. You may not use codes 
less than 32 (these are reserved for printer control codes). 

Option 2 allows you to enter the Bigprint message itself. 
First you are asked whether you want six or 10 characters 
per line. Remember that standard 10 cpi type on a nine-inch 
printer yields only six characters per line. To get 10 
characters, you must use condensed type or have a 15-inch 
printer. 

Entering each line of the Bigprint message requires two 
operations. If you are using the Model 100/200 version, 
make sure the CRPS LOCK key is depressed. The first prompt 
asks whether you want the line to be in standard or Bigprint 
type; enter S or B. 

In the Model 1000 version, you may also follow the B with 
a slash (7) and the ASCII code of the component character 
you want for that line. For example, if you want the line 


to be made up of asterisks, you type B^42. The number 42 
is the ASCII code for an asterisk. If a slash is not used, you 
get either an ‘X’ or the character that is set in Option 3. 

The second prompt asks for the message itself. You can 
use the characters 0 through 9 and A through Z. No 
punctuation marks or non-alphanumeric characters are 
allowed. If you want to add them, feel free to modify the 
program. 

Error trapping is fairly solid. You cannot enter a non- 
alphanumeric character or more than the specified six or 
10 characters per line. You may use upper- or lowercase 
letters on the Model 1000 version. The program converts 
lowercase to uppercase for output to the printer. On the 
Model 100/200 version, you must enter all capitals for 
Bigprint lines. 

Up to 15 lines in all may be entered. When you are 
through with the message, press the RETURN key with no 
other input when prompted for standard or Bigprint type. 
Your message is then displayed. At the beginning of each 
line are the characters B> or S>. These stand for Bigprint 
or standard type. 

If you choose six characters per line, you have the option 
of a screen display of your message on the Model 1000 
version. The program then asks if you want to go to the 
printer. Enter Y or y to commence printing; any other 
response results in a prompt asking if you want to save the 
message to disk. When the message has been printed on 
paper, you are asked if you want another copy. If you don't, 
type N. You are asked if you want a disk save. Type Y to 
save the file to disk or N to return to the main menu. 

For those interested in the structure of the program, I 
have used a number of arrays to set up the characters. The 
main variables are found in Line 90 of the Model 1000 
program. The array G$ consists of 41 elements that reference 
the DRTR statements in lines 1240-1310. These are all the 
combinations of X's and spaces required to produce the 36 
characters in the set. 

In turn, these are referenced by the array labeled L, which 
is two-dimensional. The eight members of each element in 
this array refer to particular strings of X's and spaces. For 
example, 6$(7) looks like this: “ XXX ~, That’s 
four spaces, three X's and four spaces. If you look at the 
DATA statement in Line 1430, you will see eight 7's. This tells 
the computer to print the string G$(7) eight times. The 
result is the character ‘T’. 

You may notice that there are 40 elements in array L and 
only 36 characters. I left room here for some punctuation 
marks, but after mapping out and debugging 36 characters, 
I'd had it. The characters begin with A in Line 1330 and 
continue sequentially through the alphabet, followed by the 
numbers. 

The Model 1000 program is well-commented. Most of it 
is standard input and string manipulation. The tricky part 
is in lines 1710-2000. This is the routine that converts the 
message, character by character, into Bigprint output and 
centers each line on the page. The corresponding screen 
output routine begins at Line 2120. You'll see similar 
language in the Model 100/200 version, although comments 
have been left out in the interest of conserving memory. ᾿ 

I had a lot of fun working it all out, and I hope you and 
your family enjoy the program. If you don’t want to type 
your fingers to the bone, send a check for $7 and I'll send 
you a Tandy 1000 disk or Model 100/200 tape. I can be 
reached at 8134 Scotts Level Road, Baltimore, MD 21208. 
My CompuServe number is 71655,1327. D 
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LISTING 1: 






ΙΝΕ IEEE 


BAR CODED LISTING | | 
pomme LL BLEU LL LLL B 


1g REM ολο ο ος ο ο ο ο ο Ακ ολο λος ο ο ο ο ος 

29 REM οκ ο ο BIGPRINT ολο ολο ο ο ος 

39 REM seeeeeenek BY MICHAEL J. HIMOWITZ seeeeeenieek 

AQ REM wre TANDY 1999 AND COMPATIBLES σε 

59 REM ο ο οσο ολο ο ο ολο ο ολ οσο οσο 

69 REM 

70 REM INITIALIZE VARIABLES, READ CHARACTER STRINGS 

89 KEY OFF 

99 DIM G$(41), L(49,8), J$(15), M(15), TF$(15), RW(29), RX(29) 

100 BE-88:TF(1)-88:TF(2)242:TF(3)-221 

110 GOSUB 3399 

120 CLS:LOCATE 3,5;PRINT"ONE MOMENT PLEASE . . ." 

139 FOR X-1 TO 41:READ G$(X) 

149 NEXT X 

150 FOR X=1 TO 36 

160 FOR Y=1 TO 8 

176 READ L(X,Y) 

189 NEXT Y 

199 NEXT X 

29g RESTORE 

219 REM 

229 REM ος BIGPRINT TITLE SCREEN w** 

239 REM 

249 GOSUB 2549:COLOR FGD,BKGD,BRDR:CLS:LOCATE 2,1:GOSUB 2149:FOR DLY=1 TO 499g:N 
EXT:GOTO 3359 

259 REM 

260 REM ‘re ENTER BIGPRINT MESSAGE www 

279 REM 

280 GOSUB 619:CLS:LOCATE 3,24:PRINT "ENTER BIGPRINT MESSAGE":PRINT 

299 PRINT"YOU MAY ENTER UP TO 15 LINES WITH UP TO"NC"CHARACTERS IN EACH LINE.":P 
RINT "YOU MAY TERMINATE THE MESSAGE AT ANY TIME BY STRIKING THE «RETURN» KEY" 
39g PRINT "AT THE INITIAL LINE PROMPT. ";:INPUT"HIT «RETURN» NOW TO BEGIN.",PE 
319 CLS:PRINT "USE B/XXX TO CREATE BIGPRINT CHARACTER OF CHRS(XXX)":PRINT:FOR J= 
1 TO 15 

326 PRINT "LINE NO. "J;:INPUT" (S)tandard or (B)igprint";TF$(J):GOSUB 1979:IF TF 
$(J)="B" THEN PRINT" ("NC" CHRACTERS MAXIMUM)":PRINT STRINGS(NC,".") 

339 IF TFS(J)="S" THEN PRINT "(72 CHARACTERS MAXIMUM)":PRINT STRINGS(72,".") 

349 IF TFS(J)<>"B" AND TFS(J)-o"S" AND TF$(J)«»"s" AND TFS(J)<>"b" THEN PRINT"' 
B' OR 'S', PLEASE":BEEP:GOTO 329 

359 LINE INPUT J$(J) 

369 IF TF$(J)-"B" AND LEN(J$(J))» NC THEN BEEP:PRINT"LINE TOO LONG":PRINT'"CORREC 
TED ";:GOTO 329 

379 IF TFS$(J)="B" THEN GOSUB 2699 

389 IF BADFLAG-1 THEN BEEP:PRINT "ILLEGAL ENTRY. YOU MUST USE CHARACTERS 9-9 OR 
A-Z.":BADFLAG-g:PRINT:PRINT "CORRECTED ";:GOTO 329 

399 IF TFS-"S" AND LEN(J$(J))> 72 THEN BEEP:PRINT "LINE TOO LONG (72 CHARACTERS 
MAXIMUM)":PRINT "CORRECTED ";:GOTO 329 

Agg NEXT J 

419 J=J-1:GOTO 45g 

429 REM 

439 REM *** CHECK MESSAGE BEFORE PRINTING *** 

449 REM 

459 CLS:PRINT"YOUR MESSAGE:":FOR K-1 TO J:PRINT TFS(K)+"> "4J8(K) :NEXT: PRINT 
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469 REM IF 6 CHARACTER LINE, OFFER SCREEN PREVIEW 

479 IF NC=6 THEN INPUT; "DO YOU WANT A SCREEN PREVIEW (Y/N)?",SP$: IF SP$-"Y".OR 

SP$2"y" THEN CLS:GOSUB 2149:FOR DLY-1 TO 39g9:NEXT:PRINT:INPUT "HIT «RETURN» TO 

CONTINUE" , PE 

489 PRINT:LINE INPUT"DO YOU WANT TO GO TO THE PRINTER NOW? (Y/N) ",PNS: IF PN$-"Y 
" OR PN$-"y" THEN 549 i 
499 INPUT "DO YOU WANT TO SAVE THIS MESSAGE TO DISK? (Y/N)";DK$:IF DK$— "Y" AND 

DK$-"y" THEN 1159 

50g GOTO 2859 

519 REM 

520 REM οσο EXECUTE BIGPRINT οσο ολο 

539 REM 

549 INPUT "POSITION PRINT HEAD AT TOP OF PAPER AND HIT «RETURN-'",PE 

550 GOSUB 1749:INPUT "ANOTHER COPY (Y/N)";ANOTHERS:IF ANOTHERS -" Y " OR ANOTHERS=" 
y" THEN 549 

560 INPUT "SAVE THIS FILE TO DISK (Y/N)";SQS$:IF SQ$<>"Y" AND SQ$<>"y" THEN 3349 

57g GOTO 2859 

580 REM 

599 REM w SET NUMBER OF CHARACTERS PER LINE seek 

699 REM 

619 CLS:PRINT: PRINT" BIGPRINT": PRINT 

629 PRINT" HOW MANY CHARACTERS PER LINE?" 

639 PRINT: PRINT" THERE IS A 6 CHARACTER LIMIT AT STANDARD 19 CPI.":PRINT"19 CHARA 
CTERS REQIRES CONDENSED FONT OR 132-COLUMN PRINTER. ": PRINT: INPUT" YOUR CHOICE (6 

OR 16}: "NC 

649 IF NC<>6 AND NC<>19% THEN 619 

659 IF NC-10 THEN WIDTH "LPT1:",132 

669 RETURN 

679 REM 

686 REM w SET PRINTER COMMANDS "eek 

699 REM 

789 GOSUB 2749:LOCATE 5,28:PRINT"PRINTER COMMANDS" 

719 LOCATE 8,6:PRINT "You may enter up to 29 direct printer commands. They shoul 
d be in the";:LOCATE 9,6:PRINT"form of decimal ASCII control or escape codes. Co 
nsult your printer"; 

720 LOCATE 19,6:PRINT "manual for details. You will be prompted for one command 

at a time. To end";:LOCATE 11,6:PRINT"the command string, hit the RETURN key wit 
h no other input when prompted"; 

739 LOCATE 12,6:PRINT"for the command line." 

749 LOCATE 15,6:PRINT"DO YOU WANT TO ENTER THESE ";:INPUT"PRINTER COMMANDS (Y/N) 
"PCS 

759 IF PCS<>"Y¥" AND PC$-"y" THEN 1150 

760 LOCATE 17,6:INPUT "MAKE SURE PRINTER IS ON LINE--THEN HIT «RETURN»";PE 

778 CLS: CM=1 

789 PRINT"COMMAND NO. "4STR$(CM)-4":";:INPUT RW(CM):IF RW(CM)-9 THEN 819 

799 CM=CM+1 | 

89% GOTO 789 

819 CLS: PRINT"HERE IS THE STRING OF COMMANDS YOU HAVE JUST ENTERED": PRINT 

829 FOR D=1 TO CM-1:PRINT"CHRS$("4STRS$(RW(D))+") ";:NEXT D 

839 PRINT:PRINT:INPUT "IS THIS CORRECT (Y/N)"; CRS: IF CR$«"Y'" AND CRS<>"y" THEN 

PRINT "CORRECTED": GOTO 779 

849 FOR D=1 TO CM-1;LPRINT CHRS(RW(D));:NEXT D:LPRINT 

850 CLS:PRINT "INPUT THE COMMANDS THAT RESTORE NORMAL PRINTING.":PRINT "HIT «RET 
URN» WITH NO OTHER INPUT WHEN FINISHED." 

866 NP=1 

879 PRINT"COMMAND NO."NP":";:INPUT RX(NP):IF RX(NP)-9 THEN 899 

889 NP-NPC*1:GOTO 879 

899 CLS:PRINT"THESE ARE THE COMMANDS TO RESTORE NORMAL PRINTING":PRINT 

999 FOR E=1 TO NP-1:PRINT"CHRS$("RX(E)")";:NEXT E:PRINT 
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916 PRINT: INPUT "IS THIS CORRECT (Y/N)";CR$: IF CR$-"Y" OR CR$-"y" THEN 1159 

929 PRINT" corrected";GOTO 869 

930 REM 

949 REM ος SET LETTER BLOCK CHARACTER *e** 

959 REM 

969 CLS: LOCATE 3,1:PRINT "THE CURRENT CHARACTER FOR LETTER BLOCKS IS "+CHR$(34)+ 
CHRS (BE)+CHR$(34)+", WHICH HAS AN ASCII": PRINT "CODE VALUE OF"; :PRINT BE; : PRINT 

"UQOUSDINPUT "DO YOU WANT TO SUBSTITUTE ANOTHER: CHARACTER (Y/N)";YD$ 

979 IF YD$<>"y" AND YDS "Y" THEN BE-88:GOTO 1159 

989 PRINT:INPUT"ENTER THE ASCII CODE FOR THE CHARACTER YOU WANT "BE 

999 IF BE « 33 OR BE » 254 THEN BEEP:PRINT "ASCII CODE MUST BE BETWEEN 33 AND 25 


4. ";:INPUT "HIT «RETURN» TO CONTINUE",PE:PRINT:GOTO 989 
1999 PRINT:PRINT "ONE MOMENT PLEASE, WHILE I CHANGE THE CHARACTER CODE..." 
1919 REM | 


1929 FOR U=1 TO 41: FOR UU=1 TO LEN(G$(U)) 

1939 IF MID$(G$(U),UU,1)<CHRS(32) THEN MID$(G$(U) ,UU,1)=CHRS$ (BE) 

1940 LOCATE 29,25;PRINT "NO."U: 

1050 NEXT UU:NEXT U 

1969 GOTO 1159 

1979 IF LEN(TFS(J))»1 THEN TF(J)-VAL(MIDS(TF$(J),3)) ELSE TF(J)-BE 

1989 TFS(J)-LEFTS$(TF$(J) , 1) 

1999 IF TFS$(J)="b" THEN TF$(J)-"B" 

1199 IF TF$(J)e"s" THEN TFS(J)-"S" 

1119 IF TF$(J)-"" THEN 419 ELSE RETURN 

1129 REM 

1139 REM eetoeeeeek THE MAIN MENU eee 

1140 REM 

1159 GOTO 3349 

1169 CHS-INKEYS:IF CH$-"" THEN 1169 

1179 ON CH GOTO 1299,289,969,1039 

1189 GOTO 3349 

1199 GOTO 1159 

1299 GOSUB 799.: GOTO. 115g 

1219 REM 

1229 REM THESE DATA STATEMENTS REPRESENT THE COMPONENT PARTS OF THE LETTERS 

1230 REM 

1249 DATA "XXX XXX" XXXXXXXXXXX,"KXXXXXX (000, XXXXXXXXX ","XXXXXXXXXX " 
1250 DATA XXX  XXXXX," XXX  ",XXX XX XXX,"XXX | XXX ", "XXX κκκ Ὁ 

1260 DATA "XXX XXX ",XXX | XXXX,XXXX  XXXX,XXX XXX XXX XXX X XXX 

1279 DATA XXXX XXX,XXXXX  XXX,XXX © XXXX,XXX | XXXXX," XXXNXXX X" 

1289 DATA " XXX XXX "," XXX XXX ","  XXXXX ο X "o" OXXXXXNX 3 
1299 DATA " XXXXXX ", " XXXX "2000 XXX "2o" XXXX πο XXXX 
1399 DATA " .XXXXX . ","  XXXXXX ","  XXXXXXX"," XXX","XXX " 
n XXXXXXXXXX" 

1319 DATA" ο πο XXXX (07, 'χὭκοαχχχκ. n s 5 XXXNX 0) XXXXXXXX 
Xx" 

1329 REM 

1339 REM THESE DATA STATEMENTS REPRESENT THE LETTERS AND NUMBERS 

1349 REM 
1359 DATA 
1369 DATA 
1379 DATA 
1389 DATA 
1399 DATA 
1499 DATA 
1419 DATA 
1429 DATA 
1439 DATA 
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TANDY 200 

24K Memory Module 

$89 — two for $170 

Can be installed in less than 2 
minutes, the only tool required is a 
coin to pop open the hatch. The 
TANDY 200 is expandable to 72K by 
adding two of our 24K modules. 
Built with the lowest power and 
most reliable memory chips 
available, The pins are made 
specifically for the TANDY 200 chip 
socket. 2-Year Warranty. 


f 


HAM EXPANSIONS! 


FOOLISH TO PAY MORE — DANGEROUS TO PAY LESS 


MODEL 100 
NEC PC-8201A, Olivetti M10 
8K Memory Module 
$29 — three for $79 
Plugs into the socket provided— 
expanding your memory by 8,192 
bytes. Super low power components 
for iong battery life. Low profile 
which is very important to properly 
fit the NEC PC-8201A. Tens of 
thousands sold since 1983. 
2-Year Warranty. 

` 
TANDY 600 eu 
96K Memory Unit 
$249 — two for $469 
You can install one or Wo of these 
units inside your TANDY 600 — 
giving you a maximum of 224K. 





NEC PC-8201A 
SIDECAR 128K RAM 
CARTRIDGE 

$259 

Plugs intesside expansion slot 
providing four additional banks of 
32K each. 


IT'S EASY TO ORDER 

Send your order with payment to the 
address below. Or, if you prefer, 
credit card orders can be handled 
by phone—VISA, MasterCard, and 
American Express are welcome. 
California residents add 6% sales 
tax. Checks allow 3 weeks to clear. 
Institutions and Corporations call for 
purchase order approval. 


1-800-732-5012 TOLL FREE 
Orders only (8am. - 5pm. PST) 


In California (805) 987-4788 
For orders or customer service 





















If you would like our latest product 
catalog or to find a dealer near you, 
please write or call (805) 987-4788 


ge PURPLE 
(44 COMPUTING 


420 Constitution Ave. 
Camarillo, CA 93010 
Telex: 888661 (PURPLE) 


Canada: Canada Portable Computer, 
Langley, B.C. (604) 856-8858 





From Computer Plus to YOU... 


PLUS after PLUS after PLUS 


Tandy 200 24K $649 
Model 600 32K $1269 
Model 100 24K $425 


DMP-130 $269 


Tandy 3000 $1969 
Tandy 3000 HD $2699 


Color Computer Il 
w/64K Ext. Basic $165 


d 


Tandy 1000 $685 
Tandy 1000 HD $1539 
Tandy 1200 HD $1599 


DMP-105 $160 


BIG SAVINGS ON A FULL COMPLEMENT OF RADIO SHACK COMPUTER PRODUCTS 


COMPUTERS 

Tandy 1000 4 Drive 128K 
Tandy 1000 HD 10 Meg. 256K 
Tandy 1200 10 Meg. 256K 
Tandy 3000 1 Drive 512K 
Tandy 3000 HD 20 Meg. 512K 
Model IVD 64K with Deskmate 
PRINTERS 

Radio Shack DMP-130 269.00 
Radio Shack DMP-430 660.00 
Radio Shack DWP-220 Daisy Wheel469.00 
Radio Shack TRP-400 Portable 229.00 
Silver Reed EXP-550P Daisy Wheel229.00 
Star SG-10 245.00 
Star SG-15 410.00 
Star SD-10 365.00 
Panasonic P-1094 259.00 
Panasonic P-1092 339.00 
Toshiba 1340 439.00 
Okidata 192 375.00 
Epson LX-80 245.00 
Epson FX-85 369.00 
Epson HS-80 Portable Ink Jet 339.00 


685.00 
1539.00 
1599.00 
1969.00 
2699.00 

889.00 


Tandy 1000/1200 ACCESSORIES 
Tandy 1000 Disk Drive Kit 159.00 
Tandy 1000 10 Meg. Hard Drive 579.00 
Hard Drive Controller Board 249.00 
256K Ram Board (inc. 128K & DMA)199.00 
512K Ram Board (includes 128K) 169.00 
256K Memory Plus Expansion Brd.249.00 
PBJ Multi-Function Board (128K) 259.00 
PBJ Multi-Function Board (256K) 279.00 
PBJ Multi-Function Board (512K) 299.00 
428K Ram Upgrade Kit (NEC) 78.00 
256K Ram Upgrade (for PBJ Board)69.00 
300 Baud Modem Board 429.00 
4200 Baud Modem Board 249.00 
RS-232 Serial Board 89.00 
Digi-Mouse/Clock Board 89.00 
Tandy 1000/1200 MONITORS 

Tandy VM-2 Green Monitor 129.00 
Tandy CM-2 RGB Color Monitor 379.00 
Tandy CM-4 RGB Color Monitor 249.00 
Tandy VM-3 TTL Green Monitor 179.00 
Tandy 1200 Text Monitor Adapt. 219.00 
Tandy 1200 Color/Graphics Adapt240.00 


CALL TOLL FREE 
1-800-343-8124 


° LOWEST POSSIBLE PRICES 
BEST POSSIBLE WARRANTY 
KNOWLEDGEABLE SALES STAFF 
TIMELY DELIVERY 
SHOPPING CONVENIENCE 


P.O. Box 1094 
480 King Street 


Littleton, MA 01460 


MODEMS 

Radio Shack DCM-3 Modem 52.00 
Radio Shack DCM-5 Modem 99.00 
Radio Shack DC Modem 2212 315.00 
Hayes Smartmodem Ι! 300 Baud 169.00 
Hayes Smartmodem 1200 Baud 429.00 
Hayes Smartmodem 12008 415.00 
FOR EVERYONE 

Network Four Outlet Surge Prot. 
CCR-81 Cassette Recorder 52.00 
CCR-82 Cassette Recorder 43.00 
C-20 Digital Cassette Tapes (10pk) 9.95 
Verbatim SSDD Plastic Box (40pk) 24.95 
Verbatim DDDD Plastic Box (40pk) 29.95 
Precision SSDD Diskettes (40pk) 15.95 
Precision DDDD Diskettes (10pk) 17.95 
NEC 64K Ram Chips (set of 8) 39.00 
NEC 256K Ram Chips (set of 8) 69.00 
Flip N File Disk 50 15.00 
Fanfold CleanEdge Paper (2600) 35.00 


69.95 


Radio Shack software 1095 off. 
Send for complete listing of 
brand name software and hardware. 


SINCE 1973 


IN MASSACHUSETTS CALL (617) 486-3193 


TRS-80 is a registered trademark of Tandy Corp. 





‘1449 DATA 34,34,34,34,1,1,2,4 
1456. DATA 9,11,12,3,3,19,11,12 
‘L469 DATA 35,35,35,35,35,35,2,2 
1478 DATA 1,13,2,14,15,1,1,1 
1480 DATA 1,16,17,14,19,18,1,1 
1499 DATA ,2,4 
1599 DATA 5 1353535 
1510 DATA 
1529 DATA 
1539 DATA 
1549 DATA 
1559 DATA 
1560. DATA 
‘1579 DATA 
(1589 DATA 1 
1596 DATA 1522; 23, 7, T. 7; 7 
| 1699 DATA /32,39,27,29,2,2 
| 1619 DATA 37,37,37,37,37,37,37,37 
1626 DATA 38,490,7,7,7,7,7,7 
163g DATA 5,2,34,4,39,35,2,2 
1640 DATA 5,2,34,32,33,34,2,5 
1659 DATA 1,1,1,2,2,34,34,34 
166g DATA 2,2,35,5,2,34,2,5 
1679 DATA 35,35,35,5,2,1,2,4 
(11688 DATA 2,2,34,34,34,34,34,34 
1696 DATA 4,2,1,4,2,1,2,4 
1799 DATA 4,2,1,2,41,34,2,4 
1719 REM 
1720 REM ΧΑΚ THIS SENDS BIGPRINT MESSAGE TO THE PRINTER wxx 
1739 REM 
1740 FOR Κ-1 TO J 
(1759 IF TF$(K)e"S" THEN GOSUB 2939:GOTO 1979 
1769 FOR Y=1 TO 8 
1779 LL-LEN(J$(K)) : TL-LEN(J$ (K) )*13 
1788 IF NC=L9 THEN TL-INT((128-TL)/2) ELSE IF NC=6 THEN TL-INT((78-TL)/2) 
1799 IF TL«9 THEN TL=1 
1899 LPRINT STRING$(TL,32); 
1816 FOR V=1 TO LEN(J$(K)) 
|1829 IF MID$(J$(K),V,1)="9" THEN MID$(J$(K),V,1)="0" 
1839 ZS$(V)=MID$(J$(K) ,V,1) 
1849 IF Z$(V)-CHR$(9) THEN Z$(V)-CHR$(32) 
1859 IF V»LEN(JS$(K)) THEN 1969 
1866 M(V)-ASC(Z$(V))-64 
(1879 IF M(V)=-32 THEN M(V)=27:GOTO 1899 
“1889 IF M(V)«-6 AND M(V)»-16 THEN M(V)-M(V)443 
1899 IQ$9G$(L(M(V),Y)O*" " 
(1990 FOR WR=1 TO LEN(IQ$):IF MID$(1Q$,WR,1)<>CHR$(32) THEN MID$(IQ$,WR,1)-CHR$(T 
F(K)) 
191g NEXT WR 
1929 LPRINT IQ$; 
1939 NEXT V 
1949 LPRINT 
1959 NEXT Y 
1969 LPRINT:LPRINT 
197g NEXT K 
1989 RETURN 
1999 REM 
2999 REM 
2919 REM wre STANDARD LPRINTING eee 
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2929 REM 

2939 IF TF$(K-1)-"S" THEN LPRINT 

(2949 IF TFS$(K-1)-"B" THEN FOR U-1 TO 2:LPRINT:NEXT U 

2059 LL=LEN(J$(K)) 

2969 TL-INT((76-LL)/2) 

2979 FOR E=1 TO NP-1:LPRINT CHR$(RX(E));:NEXT E:LPRINT:LPRINT STRINGS (TL, 32)4J8( 
K) 

2989 IF TFS(K+1)="S" THEN LPRINT 

2999 IF TFS$(K+1)="B" THEN FOR D=1 TO CM-1:LPRINT CHRS(RW(D));:NEXT D:FOR U=1 TO 
3:LPRINT:NEXT U 

2199 RETURN 

2119 REM 

2129 REM week SCREEN BIGPRINT ROUTINE Yohei 

2139 REM 

2149 FOR K=1 TO J 

2159 IF TF$(K)="S" THEN GOSUB 2419:GOTO 2369 

2169 FOR Y=1 TO 8 

2179 LL=LEN(J$(K)) : TL=LEN(J$(K) )¥*13 

2180 IF NC-19 THEN TL-INT((128-TL)/2) ELSE IF NC-6 THEN TL-INT((78-TL)/2) 

2199 PRINT STRINGS(TL, 32); 

2299 FOR V=1 TO LEN(JS$(K)) 

2219 IF MID$(J$(K),V,1)="9" THEN MID$(J$(K),V,1)="0" 

2229 Z$(V)-MIDS(J$(K),V,1) 

2239 IF Z$(V)-CHR$(g) THEN Z$(V)-CHR$(32) 

2249 IF V>LEN(JS$(K)) THEN 2359 

2259 M(V)-ASC(Z$(V)) -64 

2269 IF M(V)--32 THEN M(V)-27:GOTO 2289 

2279 IF M(V)«-6 AND M(V)>-16 THEN M(V)-M(V)443 

2289 IQ$2G$(L(M(V),Y))*" Ἡ 

2299 FOR WR=1 TO LEN(IQ$):IF MID$(IQ$,WR,1)<>CHR$(32) THEN MID$(IQS,WR,1)-CHR$(T 
F(K)) i 
2399 NEXT WR 

2319 PRINT IQ$; 

2329 NEXT V 

2339 PRINT 

2349 NEXT Y 

2359 PRINT:PRINT 

2369 NEXT K 

2379 RETURN 

2389 REM 

2399 REM ‘ieee SCREEN PRINT STANDARD TYPE serine 

24990 REM 

2419 IF TFS(K-1)-"S" THEN PRINT 

2429 IF FLAG= THEN PRINT:GOTO 2449 

2439 IF TF$(K-1)="B" THEN FOR U=1 TO 2:PRINT:NEXT U 

2449 LL-LEN(J$(K)) 

2456 TL-INT((76-LL)/2) 

2469 PRINT STRINGS$(TL, 32)+J$(K) 

2479 IF FLAG=9 THEN FLAG-1:GOTO 2599) 

2489 IF TFS(K+1)="S" THEN PRINT 

2499 IF TF$(K*1)-"B" THEN FOR 5-1 TO CM-1:PRINT CHRS(RW(D));:NEXT D:FOR U-1 TO 3 
: PRINT: NEXT U 

2599 RETURN 

2519 REM 

2520 REM ** SET UP TITLE SCREEN MESSAGE wx 

2539 REM 

2549 J$(1)-9"TANDY":J$(2)-"BIG":J$(3)-"PRINT":J$(4)-"BY MICHAEL J. HIMOWITZ":TF$( 
1)e"B":TF$(2)-"B":TF$ (3) -"B": TF$ (4)-"S" 

2556 NC=6:J=4:CLS 
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2560 RETURN 
2579 REM 

2589 REM wkwkwk CHECK LINE FOR PROPER CONTENT seek 

2599 REM 

26909 FOR CHAR=1 TO LEN(J$(J)) 

2619 CHARS-MID$(J$(J) , CHAR, 1) 

2629 IF CHAR$-»"A" AND CHAR$«-"Z" THEN 2679 

2639 IF CHAR$-»"g" AND CHAR$«-"9" THEN 2679 

2649 CODE-ASC(CHAR$) 

2650 GOSUB 2699 

2660 IF CODE=>97 OR CODE<=122 THEN MID$(J$(J), CHAR, 1)=CHR$(CODE-32) 

2676 NEXT CHAR 

2689 RETURN 

2699 IF CODE-32 THEN RETURN 

2799 IF CODE«48 THEN GOSUB 2759 

2716 IF CODE > 57 AND CODE < 65 THEN GOSUB 2750 

2729 IF CODE > 9g AND CODE < 96 THEN GOSUB 2759 

2736 RETURN 

2749 RETURN 

2759 BADFLAG-1:RETURN 

2769 CLS:BEEP:PRINT:PRINT:PRINT "SORRY, BUT THERE HAS BEEN, AS THEY SAY IN THE T 

RADE, A FATAL ERROR":PRINT:INPUT "HIT «RETURN» TO RESTART PROGRAM",PE:RUN 
2778 CLS:LOCATE 3,39:PRINT"BIGPRINT MENU" 

2786 LOCATE 7,19:PRINT "A. SET PRINTER COMMANDS" 

2799 LOCATE 9,19:PRINT "B. ENTER BIGPRINT MESSAGE" 

2899 LOCATE 11,19:PRINT"C. SET BLOCK CHARACTER" 

2819 RETURN 

2829 REM 

2839 REM where PRINT FILE TO DISK ος 

2849 REM 

2859 CLS:LOCATE 2,22:PRINT "SEND BIGPRINT MESSAGE TO DISK FILE" 

2869 LOCATE 19,22:LINE INPUT "ENTER A FILENAME.EXT: ";NF$ 

2879 LOCATE 12,15:PRINT "PREPARE DISK DRIVE AND HIT «RETURN» TO SAVE "4NF$;:LINE 
INPUT PES 

2889 OPEN NF$ FOR OUTPUT AS #1 

2899 GOSUB 3279 

2999 REM 

2919 FOR K=1 TO J 

2920 IF TFS(K)="S" THEN GOSUB 3199:GOTO 3139 

2939 FOR Y=1 TO 8 

2949 LL=LEN(J$(K)) : TL=LEN(J$(K) )*13 

2950 IF NC=19 THEN TL-INT((128-TL)/2) ELSE IF NC-6 THEN TL-INT((78-TL)/2) 
2969 IF ΤΙ» THEN PRINT#1, STRINGS (TL, 32); 

2976 FOR V=1 TO LEN(J$(K)) 

2986 IF MID$(J$(K),V,1)="9" THEN MIDS (J8(K), V,1)2"0" 

2999 Z$(V)-MIDS(J$(K),V,1) 

3999 IF ZS$(V)-CHRS(9) THEN Z$(V)-CHR$ (32) 

3919 IF V>LEN(J$(K)) THEN 3129 

3920 M(V)-ASC(Z$(V) ) -64 

3939 IF M(V)--32 THEN M(V)-27:GOTO 3959 

3049 IF M(V)<-6 AND M(V)>-16 THEN M(V)eM(V)443 

3959 IQ$-G$(L(M(V),Y))o" » 

3960 FOR WR=1 TO LEN(IQ$):IF MID$(1Q$,WR,1)<>CHR$(32) THEN MIDS$(IQS,WR,1)-CHRS(T 
F(K)) 

3979 NEXT WR 

3989 PRINT#1,1Q$; 

3999 NEXT V 

3199 PRINT #1,"" 

3119 NEXT Y 
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Megabytes for Mini-Bucks 


Tandy 1000 Hard Drives 
by Hard Drive Specialist 





Shop and compare. Hard Drive Specialist has been 
building hard drive systems for years and have sold thou- 
sands of subsystems to satisfied Radio Shack/Tandy cus- 
tomers. We use the latest state-of-the-art disk drives and 
controllers. Our drives all use buffered seek logic and plat- 
ed media to result in almost one-fourth the average access 
times found on our competitors drives. Plated media 
results in longer platter life and high resistance to head 
crashes not found on coated media drives. We utilize high 
quality construction throughout including heavy duty 
power supplies and gold edge card connectors. Internal 
drive systems include an interface card and a half-height 
hard drive that replaces the top disk drive in both size and 
power consumption. External units include an interface 
card, case, power supply and hard drive unit. All units re- 
quire a memory board with DMA such as the TanPak™ 
multifunction card, or a Tandy Board, Part #25-1004. 


Ordering Information 


Use our WATS line to place your order via Visa, MasterCard, or Wire Transfer. Or, mail your 
payment directly to us. Any non-certified funds will be held until proper clearance is made. COD 
orders are accepted as well as purchase orders from government agencies. UPS ground is our 
standard means of shipping unless otherwise specified. Shipping costs are available upon re- 
quest. Tandy and Radio Shack are trademarks of the Tandy Corporation. TanPak, is a trademark 
of Hard Drive Specialist, a division of Compukit Corporation 


inn δ Disk System Features: 


10 
20 
42 
10 
20 
42 


All sizes rated after formatting. 

One secondary drive may be added. 
Error checking and correcting controller. 
Software drivers included. 

Buffered seek drives for improved access time. 
Built in power up diagnostics. 

Plated media for long disk life. 

Gold connectors used throughout. 

1 year warranty. 

Boots directly from Hard Drive. 

Uses Tandy 1000 MS DOS. 


Megabyte Internal................ $ 549. 
Megabyte Internal................ $ 749. 
Megabyte Internal................ $1349. 
Megabyte External............... $ 699. 
Megabyte External............... $ 899. 
Megabyte External............... $1495. 


Hard Drive Specialist 
16208 Hickory Knoll 

Houston, Texas 77059 

1-713-480-6000 


Order Line 
1-800-231-6671 





3129 PRINT#1,"":PRINT #1,"" 

3139 NEXT K 

3140 GOTO 3286 

3159 REM 

3169 REM 

3179 REM οσο STANDARD PRINTING ἈΠΟ 

3189 REM 

3199 IF TF$(K-1)="S" THEN PRINT#1,"" 

3299 IF TFS(K-1)-"B" THEN FOR U-1 TO 2:PRINT#1,"":NEXT U 

3219 LL-LEN(J$(K)) 

3226 TL-INT((76-LL)/2) 

3239 FOR E-1 TO NP-1:PRINT#1, CHRS(RX(E));:NEXT E;PRINT#1,""; PRINT#1, STRINGS (TL 
,32) *J$ (K) 

3249 IF TF$(K+1)="S" THEN PRINT#1,"" 

3250 IF TF$(K+1L)="B" THEN FOR D-1 TO CM-1:PRINT41,CHRS(RW(D));:NEXT D:FOR U=1 TO 
3:PRINT#1,"": NEXT U 

3269 RETURN 

3279 FOR D-1 TO CM-1:PRINT#1, CHRS(RW(D));:NEXT D:PRINT#1,"":RETURN 

3289 CLOSES1:LOCATE 14,29:PRINT "FILE “+NF$+" SAVED. HIT «RETURN» FOR MENU.";:LI 

NE INPUT PE$:GOTO 3349 

3299 RETURN 

3399 COLOR 7,9,%:CLS:LOCATE 9,19:PRINT "DO YOU HAVE A COLOR MONITOR? (Y/N)" 

3319 MNRS=INKEY$:IF MNRS$="" THEN 3319 

3320 IF MNRS<>"Y" AND MNR$<"y" THEN FGD=7:BKGD=9: BRDR=9; RETURN 

3330 FGD=7:BKGD=1: BRDR=1: RETURN 

3340 REM σος BAR MENU ROUTINE COURTESY OF FRANK R. NEAL wy 

3359 ROW-8:COL-29:"' SET ROW AND COLUMN FOR MENU 

3369 ClF-FGD:ClB-BKGD ' SET COLOR CODES 

3376 C2F-BKGD:C2B-FGD:"' SET BAR COLOR TO COLOR 6,2 

3389 M$(1)="SET PRINTER COMMANDS":M$(2)-2"ENTER BIGPRINT MESSAGE":M$(3)2"CHANGE B 

LOCK CHARACTER" :M$(4)="QUIT THE PROGRAM" 

3399 NP-4: 

3499 ' 

3419 GOSUB 3489 

3429 CLS 

3439 ON CH GOTO 1299,289,969, 3699 

3449 GOTO 3349 

345% GOTO 3419 

3469 "' 

3479 ' 

3486 COLOR CIF,CIB:CLS:LOCATE ROW,COL*11:PRINT"THE BIGPRINT MENU":LOCATE ROW+1,¢ 
OL:PRINT"Use <ARROWS> to select «ENTER» to Choose":FOR J=1 TO 16:X$-INKEYS:NEXT: 
CH-1 

3499 LS-2:FOR J=1 TO NP:IF LEN(M$(J))>LS THEN LS-LEN(M$(J)) 

359g NEXT:ML$="## \"+SPACE$(LS-1)+"\": SL-COL418- LEN(ML$ ) /2 

3519 FOR K-1 TO NP:LOCATE ROW+2+K,SL:PRINT USING ML$;K,M$(K):NEXT 

3520 LOCATE ROW+2+CH,SL:COLOR C2F,C2B:PRINT USING ML$;CH,M$(CH):COLOR CIF,ClB:TD 
=CH 

3539 XS=INKEY$:IF LEN(X$) THEN KP-ASC(RIGHT$(X$,1)) ELSE 3539 

3549 IF KP=72 THEN CH=CH-1:IF CH«1 THEN CH=NP 

3550 IF KP-89 THEN CH=CH+1:IF CH>NP THEN CH=1 

3569 IF X$=>"L" AND X$<="9" THEN IF VAL(X$)=>1 AND VAL(X$)«-NP THEN CH-VAL(X$):R 
ETURN 

3576 IF KP-13 THEN RETURN 

3580 IF KP<>72 AND KP«280 THEN KP-KP-48:IF KP<1 OR KP>NP THEN PRINT CHR$(7):GOTO 
3539 ELSE CH-KP 

3590 IF CH-TD THEN 3539 ELSE LOCATE ROW+2+TD,SL: PRINT USING ML$;TD,M$(TD):GOTO 3 
520 

3699 CLS: LOCATE 3,5:PRINT"THANK YOU FOR USING BIGPRINT":END 
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ΠΠΠΠΠΠΗΠΠΠΠΠΠΠΠΠΠΠῚ 
BAR CODED LISTING | 
[rrr re TTT TET 


LISTI 
NG 2: 


19 REM BIGPRINT TANDY MODEL 199/299 

29 REM BY MICHAEL J. HIMOWITZ 

39 CLEAR 44909 

49 DIM G$(41), L(49,8), J$(15), M(15), T 
F$(19), RW(29), RX(29) 

59 BE-88 

69 GOSUB 959 

76 CLS:PRINT"ONE MOMENT PLEASE....":FOR 

X=1 TO 41:READ G$(X) `` 

89 IF BE<>88 THEN GOSUB 689 

99 NEXT X 

199 FOR X=1 TO 36 

119 FOR Y-1 TO 8 

12% READ L(X,Y) 

139 NEXT Y 

149 NEXT X 

15g RESTORE 

169 GOSUB 559 

176 GOTO 189 

189 CLS:PRINT"YOU MAY INPUT UP TO 15 LIN 
ES WITH UP TO"NC "LETTERS EACH" 

19% PRINT:PRINT "TO BEGIN, ";:INPUT"PRES 
S «ENTER-»";PE 

209 CLS:FOR J-1 TO 15 

219 PRINT "LINE NO."J;:INPUT"(S)TANDARD 

OR (B)IGPRINT";TF$(J):GOSUB 949:IF TF$(J 
)e"B" THEN PRINT"("NOC" CHRS MAX.)" 

226 IF TF$(J)< "B" AND TF$(J)<>"S" THEN 

PRINT"'B' OR 'S', PLEASE":SOUND 1999,5:G 
OTO 219 

239 LINE INPUT J$(J) 

249 IF TF§(J)="B" AND LEN(J$(J))» NC THE 
N SOUND 1199,3:PRINT"LINE TOO LONG": PRIN 
T"Corrected":GOTO 219 

259 GOTO 279 

260 LL-LEN(J$(J)):VB-NC-LL:VC-INT(VB/2) * 
1:J$(J)sSSTRINGS$(VC,32)4J9(J) 

279 NEXT J:GOTO 299 


| 












280 J-J-1:GOTO 299 

299 CLS:PRINT"YOUR MESSAGE:":FOR K-1 TO 
J:PRINT TF$(K)4"2"4J$ (K)4"/"; : NEXT: PRINT 
:PRINT"PRINT THIS? (Y/N)"; 

39g YNS=INKEY$:IF YN$="" THEN 399 ELSE I 
F YNS<>"Y¥" THEN 959 

319 CLS:PRINT:LINE INPUT "PREPARE PRINTE 
R AND HIT <ENTER> TO PRINT"; PES 

329 FOR K=1 TO J 

339 IF TF$(K)-"S" THEN GOSUB 699:GOTO 51 


g 

349 FOR Y=1 TO 8 

359 LL=LEN(J$(K)) : TL=LEN(J$ (K) ) *13 

369 IF NC=19 THEN TL-INT((128-TL)/2) ELS 
E IF NC=6 THEN TL-INT((78-TL)/2) 

379 IF TL«9 THEN TL=Ø 

389 LPRINT STRINGS$(TL, 32); 

399 FOR V-1 TO LEN(J$(K)) 

490 IF MIDS(J$(K),V,1)="9" THEN MIDS(JS( 
K) iV, L)=nor 

419 Z$(V)-MIDS(J$ (K),V, 1) 

420 IF V>LEN(J$(K)) THEN 59g 

439 M(V)-ASC(ZS(V))-64 

449 IF M(V)--32 THEN M(V)=27:GOTO 469 
459 IF M(V)«-6 AND M(V)»-16 THEN M(V)-M( 
V)443 

469 LPRINT G$(L(M(V),Y))4" ν; 

47 NEXT V 

480 LPRINT 

499 NEXT Y 

500 LPRINT:LPRINT 

51g NEXT K 

529 PRINT:PRINT "ANOTHER COPY? (Y/N)" 
539 CPS-INKEYS:IF CP$-"" THEN 539 ELSE I 
F CP$-"Y" THEN 319 

549 GOTO 959 

559 GOTO 569 

569 CLS:PRINT"HOW MANY CHARACTERS PER LI 
NE?" 

570 PRINT"6 CHARACTERS (STANDARD 19 CPI) 
":PRINT"19 CHARACTERS (NEEDS CONDENSED": 
PRINT"FONT OR 132-COL PRINTER)":PRINT:IN 
PUT"YOUR CHOICE (6 OR 190)";NC 

589 IF NCS6 AND NC 19 THEN 559 

599 RETURN 

699 IF TFS(K-1)="S" THEN LPRINT 

619 IF TFS(K-1)="B" THEN FOR U-1 TO 2:LP 
RINT:NEXT U 

629 LL-LEN(J$(K)) 

639 TL-INT((76-LL)/2) 

649 FOR ΕΞΙ TO NP-1:LPRINT CHR$(RX(E));: 
NEXT E:LPRINT STRINGS (TL,32)+J$(K) 

659 IF TFS$(K+1)="S" THEN LPRINT 

669 IF TF$(K+1)="B" THEN FOR D-1 TO CM-1 
:LPRINT CHR$(RW(D));:NEXT D:FOR U-1 TO 3 
:LPRINT:NEXT U 

679 RETURN 

689 FOR U=1 TO LEN(G$(X)) 

699 IF MID$(G$(X),U,1)-"X" THEN MID$(G$( 
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X),U,1)=CHR$ (BE) 

790 NEXT U:RETURN 

719 CLS:PRINT"YOU MAY ENTER UP TO 29 DIR 
ECT PRINTER COMMANDS. THEY SHOULD BE 
IN THE FORM OF ASCII CONTROL OR ESCAPE 
CODES. TO | END THE STRING OF COMMANDS 
| HIT «ENTER» WITH NO OTHER INPUT. DO TH 
IS? (Y/N)" 

729 PCS-INKEYS:IF PC$="" THEN 729 

739 IF PCS< "Y" AND PG$<>"y" THEN 959 


PRINT:PRINT "HIT ANY KEY TO CONTINUE"; 

1929 DATA "XXX XXX" ΧΧΧΧΧΧΧΧΧΧΧ, "XXX 

ΧΧΧΧ. "," XXXXXXXXX ","XXXXXXQXXX " | 

1930 DATA XXX  XXXXX," KXK "XKX 

XX XXX,"XXX XXX ","XXX XXX " 

1949 TIS-INKEYS:IF T1$="" THEN 1949 

1859 DATA "XXX XXX "ΧΧΧ. XXXX,XXXX 
XXXX,XXX XXX XXX,XXX X ΧΧΧ 

1869 DATA XXXX XXX,XXXXX XXX, XXX 

XXXX,XXX  XXXXX," XXXXXXX X" 
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749 CLS:CM-1 1979 RETURN 

759 PRINT"COMMAND NO, "4STR$(CM)4":"; IN 1989 DATA " XXX XXX "," XXX XXX "," 
PUT RW(CM):IF RW(CM)=9 THEN 789 XXXXX  "," X η. OXXXXXXX " 
768 CM=CM+1 1999 DATA " XXXXXX ", "  XXXX κ 
779 GOTO 756 " XXX LIL 0-6 4:94 "oo" ΧΧΧΧ 
789 CLS:PRINT"HERE IS THE STRING OF COMM " 

ANDS YOU HAVE JUST ENTERED:" 1199 DATA "  XXXXX NUM XXXXXX "2 
799 FOR D=1 TO CM-1:PRINT"CHR$("4STR$ (RW XXXXXXX"," ΧΧΧ", "ΧΧΧ HHH 
(D))4") ";:NEXT D "OXXXXXXXXXX" 

89g PRINT:INPUT "IS THIS CORRECT (Y/N)"; 1119 DATA " "20" 0 XXXX ή, 
CRS: IF CRS<>"Y" THEN PRINT "corrected": "ΧΧΧΧΧΧΧΧΧ "," XXXXX ",  ΧΧΧΧΧΧΧΧ 
GOTO 746 Xx" 

819 FOR D-1 TO CM-1:LPRINT CHR$(RW(D));: 1129 DATA 4,2,1,1,2,2,1,1 

NEXT D:LPRINT 1136 DATA 5,2,1,5,2,1,2,5 

820 CLS:PRINT"INPUT THE COMMANDS THAT RE 1149 DATA 4,2,35,35,35,35,2,4 

STORE NORMAL PRINTING. HIT «ENTER» ALON 1159 DATA 5,2,1,1,1,1,2,5 

E WHEN DONE" 1166 DATA 2,2,35,3,3,35,2,2 

839 NP=1 1179 DATA 2,2,35,3,3,35,35,35 

849 PRINT"COMMAND NO."NP":";: INPUT RX(NP | 118g DATA 36,2,35,6,6,1,2,36 

):IF RX(NP)-9 THEN 869 1199 DATA 1,1,1,2,2,1,1,1 

859 NP=NP+1:GOTO 849 1299 DATA 7,7,7,7,7,7,7,7 

869 CLS:PRINT"THESE ARE THE COMMANDS TO 1219 DATA 34,34,34,34,1,1,2,4 

RESTORE NORMALPRINTING:" 1229 DATA 9,11,19,3,3,19,11,12 

879 FOR Ε-1 TO NP-1:PRINT"CHR$S("RX(E)")" 1239 DATA 35,35,35,35,35,35,2,2 

; NEXT E 1246 DATA 1,13,2,14,15,1,1,1 

889 PRINT:INPUT "IS THIS CORRECT (Y/N)"; 1256 DATA 1,16,17,14,19,18,1,1 

CR$:IF CR$-"Y" THEN 959 1269 DATA 4,2,1,1,1,1,2,4 

899 PRINT"corrected":GOTO 839 1279 DATA 5,2,1,2,5,35,35,35 

999 CLS:PRINT"THE DEFAULT CHARACTER FOR 1289 DATA 4,2,1,1,8,1,5,29 

LETTER BLOCKS IS 'X', WHICH IS ASCII (88 1299 DATA 5,2,1,5,2,1,1,1 

). DO YOU WISHTO SUBSTITUTE ANOTHER CHAR 130 DATA 36,2,35,5,36,34,2,5 

ACTER? (Y/N)?" 1316 DATA 2,2,7,7,7,7,7,7 

919 LINE INPUT YD$:IF YD$<>"Y" THEN BE=8 1326 DATA 1,1,1,1,1,1,2,4 

8:GOTO 939 1339 DATA 1,1,1,21,22,23,7,24 

929 INPUT"ENTER THE ASCII CODE FOR THE C 1349 DATA 1,1,1,15,14,2,1.1 

HARACTER YOU WANT";BE 1359 DATA 1,1,21,23,25,21,1,1 

939 GOTO 959 1369 DATA 1,21,22,23,7,7,7,7 

949 IF TF$(J)-"" THEN 289 ELSE RETURN 1370 DATA 2,2,32,39,27,29,2,2 

959 CLS: PRINT" BIGPRINT":P 1389 DATA 37,37,37,37,37,37,37,37 

RINT" 1399 DATA 38,49,7,7,7,7,7,7 

969 PRINT" A. SET PRINTER COMMANDS" 1499 DATA 5,2,34,4,39,35,2,2 

: PRINT" B. ENTER 'BIGPRINT' MESSAGE 1419 DATA 5,2,34,32,33,34,2,5 

"PRINT" C. SET BLOCK CHARACTER" 1429 DATA 1,1,1,2,2,34,34,34 

970 CHS=INKEY$:IF CH$-"" THEN 979 1439 DATA 2,2,35,5,2,34,2,5 

989 ON INSTR("AaBbCc",CH$) GOTO 19990,1909 1449 DATA 35,35,35,5,2,1,2,4 
8,79,72,999,999 1456 DATA 2,2,34,34,34,34,34,34 

996 GOTO 959 1469 DATA 4,2,1,4,2,1,2,4 

1999 GOSUB 719:GOTO 959 1476 DATA 4,2,1,2,41,34,2,4 

1919 IF K/6<> INT(K/6) THEN RETURN ELSE ECM 
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WL DOS Boot 


Protect confidential files 
from prying eyes 


Security's the Name 
of the Game 


By John B. Harrell, III T month, I would like to con- 


; ; à tinue with the concept of device 
PCM Contributing Editor drivers, which I touched on 


briefly when we examined the ANSI- 
-SYS extended screen and keyboard 
control driver. Device drivers are a rich 
and fertile area, and also one of the 
worst explained features of the MS- 
DOS operating system. 

MS-DOS has a wealthy heritage. It 
is derived directly from that venerable 
old faithful — CP/M. If you closely 
examine the functions available, you 
will note that many of them are identical 
to their CP/M counterparts. Unfortu- 
nately, MS-DOS also suffers from 
many of the same weaknesses as its 
predecessor 


Keep those Prying Eyes Out 

One weakness is particularly annoy- 
ing — lack of system security. If you are 
familiar with the Model-III/4 TRS-80 
disk operating system, you will proba- 
bly miss the password protection af- 
forded by this system. Files can be 
hidden just as in the MS-DOS system, 
but they can also be assigned two 
different types of password protection 
and user protection "levels," which are 
used to control file access. 

Since MS-DOS lacks this type of 
protection in any form, anyone may 
walk up to your computer and use it. If 
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you have a hard disk, this can be par- 
ticularly annoying. Data with any 
amount of sensitive information simply 
cannot be maintained on the hard disk, 
forcing you to use those slow floppy 
disks for storage. 

My first attempt to remedy this prob- 
lem was to write a short program in C 
that read a password from the user and 
validated it. If the password was valid, 
the system would proceed. If it was 
invalid, the system would “hang up.” 
Placed in the AUTOEXEC . BAT file or any 
other batch file, this effectively pre- 
vented inexperienced users from gain- 
ing access to my prized disk files. 

Alas, MS-DOS is too kind. If you 
press the CTRL-C or CTRL-BREAK keys 
at the "right" time during the start-up 
sequence, COMMAND.COM allows you to 
terminate the AUTOEXEC batch file. 
Smart users soon find out that they can 
get around this type of password pro- 
tection very effectively. 

I had to find another way. It seems 
that the only time you are isolated from 
the actions described is before the 
system has finished starting itself. But 
how can we accomplish getting our 
program loaded before the system is 
ready? Enter the device driver! 


Notes 


After the system completes its diag- 
nostic self-checks, the Boot ROM at- 
tempts to load the first sector from the 
hard disk or, failing this, from the 
floppy disk in Drive A:. The boot sector 
loads the BIOS code from the disk, then 
executes the initialization phase of the 
BIOS code after it has successfully 
loaded. 

The BIOS code loads the MS-DOS 
operating system from the disk and 
initializes it. MS-DOS then loads COM 
MAND.COM from the disk and the com- 
mand processor performs several func- 
tions. One of the first is to analyze the 
contents of the CONFIG.SYS file (if 
present) and perform the specified 
actions. This is done before the system 
is ready for execution to allow you to 
place additional peripheral drivers such 
as extended memory boards and alter- 
native console devices (ANSI.SYS) in 
the system before getting control of the 
system for your applications. 

Here's where we will install the pass- 
word protection scheme. At least we 
will be able to control who boots up on 
the system using our disk. Of course, if 
they bring their own MS-DOS boot 
disk, it will not work. But, it is better 
than nothing. 


Figure 1 


Device Driver Chain for a Tandy 2000 


The Mystery of Device Drivers 

Never before has one facet of any 
system been so shrouded in secrecy. 
While the documentation is technically 
quite complete, the lack of program- 
ming examples hinders your creative 
ability beyond belief. PC-DOS does 
contain an excellent example of a device 
driver, but it is for a RAM disk (block 
device) and there is nothing to illustrate 
how to write a character-oriented de- 
vice. 

Listing 1 was written to make use of 
a reserved feature of the MS-DOS 
operating system to explore the device 
driver chain. The operating system 
maintains a linked list of all the device 
drivers installed in the system and, once 
you find the head, following the list is 
easy. Running Listing | produces a list 
of device driver information similar to 
the one in Figure 1 (all addresses may 
be different, this one is for my IBM PC 
XT using PC-DOS 3.0 and my config- 
uration). 

The MS-DOS Programmer's Refer- 
ence Manual states that the NUL device 
is always the beginning of the list and 
you can never reassign it. In the system 
reserved bytes of the file control block, 
or FCB, MS-DOS conveniently places 


The underlined device entries are installed using the device ΜΙΝΙ in the CONFIG. SYS file. The first entry is ` 
a RAM disk driver, the second is the driver for ANSI.SYS (it replaces the functions of the CON driver ΜΕ Stain 
and Stdout), and the third is my password, driver. 


Device Driver. 
| Resident Header Chain 
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Starting 
Address 


0127:0154. 


0892:0000 
0B2F : 0000 
@7ED: 8000 
@07@:015D 
0070:01EE 
0070:0290 
0070:0317 
0020:03E3 
0070:0200 
@070:02AF 
@070:@AAB 
@07@:@ABD 
9020:0RCF 
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Next 


Har: Addr 


9892:0000 


'ΘΒ2Ε : 0000 


@7ED: 0000 
0070:015D 
9070:01EE 
0070:0290 
0070:0317 
0020:03E3 


9070:0200 . 


0070: 02RF 


0020: 0RRB: 
@@790:@ABD 


9870: @ACF 


90070:FFFF 


"Stratequ 


Entry Pot 


0127:1582 
|.9892:0089 

| QB2F :@0A2 
92Ε0:0036 


9070 00AE 
0079 = 0AE 
0020:00RE 
0020:00RE 


:0020:00RE ^ ^. 
.9020:00RE ^. 
0020:00RE 


0070: ΘΘΒΕ 
0070:00RE 


0020:000E 


Interrupt 


t Entry Ρως 


9127:1508 
0892:0004. 
ΘΒ2Ε :00AD 


@7ED= 0041 


0070:0089 


0070: 00BF 


i 0070 :000E 


0070:00E3 
0070:00E9 


9070:00BF ` 
0070 :00CE 
"0070:0004 . 
9070:000R 
0070:0005 


Device: 
Name iii 


NUL i 
i Block Device Units 


CON. 


c PASSHDS. 
CON 


AUX 


ΠΩΡΕΝ 
CLOCKS 


5 Block Device Units 
COMI | 

LPTL 

LPT2 ὶ 

ΕΡΤ ` 


‘COM2 





pe 1 continued | 


ATTRIBUTE WORD BIT DEFINITIONS 


Block^Character Device 


Device accepts 170 control strings | 
Block device is IBM format 
OpenzClose^7Removable Media (DOS 3. xj 


Device Uses special handling (INT 29H) 


the segment and offset addresses for any 
device you can successfully open. The 
first section of Listing 1 documents the 
structure of the FCB, including these 
reserved areas. 

Note that there is a distinction be- 
tween versions of the MS-DOS operat- 
ing system. If you are a Tandy 3000 user 
or are operating your 1000 or 1200 
under PC/ MS-DOS Version 3.x, then 
you should delete the comment braces 
{} around the code for MS-DOS V3.x 
and comment out or delete the Version 
2.x dependent code. Listing | will not 
work correctly on the wrong version. 

The next structure documents the 
format of the device driver header 
consisting of 18 bytes of information. 
The first four bytes consist of the 
segment/ offset address pointing to the 
next device header. The offset address 
contains ΦΕΕΕΕ if the header is the last 
one in the chain — see the second 
column of Figure 1. This segment/ 
offset address is also the starting ad- 
dress (first column) of the next device 
driver in the chain. 

The next two-byte field contains the 
device driver attributes, explaining to 
the system how the driver is to be used. 
The breakdown of this field is also 
contained in Figure 1. The most signi- 
ficant characteristic is the leading bit of 
the attribute word denoting the two 
broad classes of device drivers — char- 
acter and block device. We will prima- 
rily be interested in the character devi- 
ces for this discussion of password 
protection. 

After initializing the display, the 
“device chain” program opens the NUL 
device, suing the standard Version 1.x 
MS-DOS file open request. This returns 
the updated FCB for our access — 
remember, this now contains the start 
of the chain for the device drivers. The 


next major section of Listing 1 uses this 
information to *walk" the device header 
chain and prints the information on the 
video display. 

Now back to Figure 1 for a few more 
words on explanation. This figure was 
created on my IBM PC XT and several 
special features are worth noting. First 
of all, the program reports that I have 
a total of six block devices installed. My 
current configuration supports one real 
floppy disk, three virtual floppy disks (a 
la SYSTEM/36) and a rigid disk assem- 
bly. 

The BIOS creates these five entries as 
one device header, which is determined 
by the configuration sense-switches on 
startup. I also have a RAM disk driver 
installed, bringing the total of the block 
devices to six. 

The third entry in the list is a rede- 
finition of the CON (console) device. 
This is for the ANSI . SYS driver. Because 
MS/PC-DOS scans this device list in 
the same order that we have printed it, 
you will always find the most recent 
definition of the device, allowing you to 
change system characteristics at will. 


Installing Password Protection 

The first step in installing password 
protection on your system is to key in 
the program from Listing 2 and run it. 
This creates the device driver file PASS 
-SYS containing the password code 
with the initial start-up password of 
passuordi. This initial password is 
very important — do not forget it. I'll 
show you how to change it shortly. 

The next step for installation is to 
copy the new PASS .SYS file to the root 
directory of your boot disk. Hard disk 
users may want to create a test floppy 
disk to try out the password routine 
prior to "casting stones" at the hard 
disk. 


CLOCK Device 
NUL. Device 
STDOUT Device 
STDIN Device 





You now have to add a command to 
your CONFIG.SYS file. What? You do 
not have a CONFIG.SYS file? Shame on 
you. Even floppy disk users can benefit 
from the commands available for sys- 
tem configuration (but that's another 
story). If you have already created one 
for installing RNSI.SYS, then all you 
need to do is add the following line to 
the file: 


DEVICE-PRSS.SYS 


by using EDLIN or any other text 
processor. If PASS.SYS has been in- 
stalled on your hard disk in a subdirec- 
tory, don't forget to specify the path- 
name in the "device" command above. 

Now you are ready for the acid test! 
Reset the computer and try it out. The 
very first thing you should see after the 
copyright notice is the initial message 
requesting your password. Enter pass 
uord1 as the initial password. Press the 
ENTER key and you should see the 
remainder of your boot sequence just as 
always. 


What Happens Next 

A program that stays resident and 
"eats" up memory (however small) 
without some additional benefit cannot 
be too worthwhile. You are right! There 
is more to PASS.SYS than meets the eye 
on startup. As part of its initialization 
process, it has used one of the interrupts 
that DOS provides for users (INT 62H). 

This interrupt allows you to access 
another part of PASS.SYS from within 
any program and provides you with an 
additional security measure. Look at 
Figure 2 — it is a simple dialogue with 
DEBUG that creates a stand-alone pro- 
gram called PWRD.COM, which uses this 
interrupt. 

PWRD.COM is not very fancy, but it is 


April 1986 PCM 77 






in error, 


“al pp 0 


CX 999g 
:8g 






B: 


effective. You can include this one in a 
batch file and it will not terminate until 
the correct password has been entered. 
First of all, it uses INT 62Η to interro- 
gate the user via PASS.SYS for the next 
password (in this case, password2). 
The password validation flag is re- 
turned via the AX register and the next 
instruction determines its value. If it is 
zero, the password is good and we 
return to DOS. If it is non-zero, the 
program displays an error message and 
waits for the user to press any key. 

After pressing a key, the program 
loops back for another password at- 
tempt and keeps on doing this until you 
have entered the correct one. If you 
have my MENU source code, it is a 
relatively simple feat to add a small code 
block to it just prior to exiting to the 
DOS command level. This prevents 
someone from exiting to DOS unless 
they have been granted the proper 
authority. 

Because simplicity was the key with 
this program, I used DOS Function 
Code 9 to display a string in the video 
screen. During the brief moment while 
the string is being displayed, you are 
susceptible to the CTRL-C interrupt. Re- 
writing this routine to use the BIOS code 
display characters routine will alleviate 
this problem. 

One word of caution is appropriate 
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XXXX:0127 db "You have entered the wron 





Figure 2 


| Debug Sequence for Creating PWRD.COM i i HEHEHEHEH 
This file provides a sequence of commands and entries for DEBUG, which creates the file PHRD.COM. PRD invokes _ 
, the interrupt 67H capabilities of the PASS. SYS file and allows you to use the password routine from any batch file. 
_ Enter the file exactly as below, typing the underlined parts of the dialogue in response to the computer. Make sure 
_ to end each of the lines by pressing the ENTER (RETURN) key. Do not type the comments as DEBUG will flag them: 


B:\> debug pwrd.com 
File not found 


XXXX:9199 int 67;Invoke password routine at interrupt 67H . 
SUXXXX:9192 or ax,ax;Set flags on return result for test 
XXXX:9194 jnz 198;Non-zero is an error condition 
XXXX:g1g6 int 29;Return to operating system 
XXXX: 9198 mov ah,9;Function call to display string 
| | XXXX:g1gA mov dx,129;Address offset of string 
| XXXX:919D int 21;Call MS-DOS to display ‘string i H 
XX:919F mov ah,7;Function call for Direct Console Input | 
XXXX: 9111 int 21;Call MS-DOS to get a key with no echo  . 
XXXX:9113 jmp 199;Repeat password scan ^ 
XXXX:9115;Press ENTER here to exit assembler 
| (4al29;Set message area i i: FHH 
(XXXX:9129 db 7,7,7,d,a;a,a. 


-w;Write PWRD.COM to disk 
Writing 9989 bytes i 
"irqsQuit DEBUG and return to DOS . 


the interrupt vector area between the 
Tandy Model 2000 and the IBM PC. I 
developed PASS .SYS on the Tandy 2000 
and was going to be polite. I would first 
invoke the previous INT 67H processor 
to allow it to perform the desired func- 
tion and would then process the pass- 
word. 

On the Tandy 2000, this would work 
fine even if no other program had used 
this vector. The BIOS initialization 
stores the address of an immediate 
return instruction here and you effec- 
tively get a NOP. When I first tried it 
on the IBM PC, it took an immediate 
and lengthy “lunch break,” forcing me 
to turn it off to restore it. I really 
clobbered something. 

I figured PASS.SYS was conflicting 
with one of the myriad number of 
resident programs I usually have in- 
stalled, so I removed them. It imme- 
diately took a second lunch break — 
definitely time to trouble-shoot. It turns 
out the IBM PC does not initialize this 
area and leaves it set to all zeros. Oh 
well, the moral of this story is do not 
use PWRD.COM or any other INT 67H 
access if PASS.SYS is not installed. 


Assigning Your Own Passwords 
Figure 3 contains yet another dia- 
logue for DEBUG that allows you to 


g password for access,',d,a,a 
XXXX:9159 db "Press any key to try again. HT Har ir 3 THEE 
(KXXX:9179;Press ENTER here to exit assembler f 
-rex Set: CX register with proper byte count: 


here. I discovered a large difference in 






















assign your own passwords to PASS 
.SYS. The first password assigned 
(offset @2F 5H) is used for initial system 
load and the second password assigned 
is used for subsequent calls to PASS 
-SYS using PWRD or INT 67H. 

Assign your own passwords where I 
have indicated "first" and “second 
password" in the dialogue. There are 
two important considerations that must 
be followed for PASS.SYS to work 
correctly: make sure your assigned 
password does not exceed 15 charac- 
ters, and make sure any remainding 
(unused) characters are filled out with 
spaces. 


Passed Out 

I have really found this simple en- 
hancement a real security addition in a 
situation where anyone can delete your 
most prized four-megabyte database 
right before your eyes. Those people 
who require access and have the proper 
knowledge can easily be controlled 
using this scheme. 

It certainly is not a panacea for all 
security problems. File encryption and 
file locking would do nicely to comple- 
ment this feature. Until these features 
are built into the operating system, the 
only sure security is to lock up your 
machine or hard disk at night. . . until 
next month. ΠΠ 


Figure 3 
Debug Command Sequence for Changing the Passwords 


This dialogue using DEBUG’ shows how to alter either one or both of the passwords contained in ΡΒ55.5Υ5. Type 
the portion of the dialogue that is underlined and you will change the passwords from the current. default values of 
password. and password2 to those indicated below. 

It is important to remember that the maximum length of the password string is 15 characters. Do not store any 
more than this to prevent damaging the remainder of the program. Also, if you are storing a shorter string in the 
place of a longer one, do not forget to add enough blank characters to the end of the modify steps to fill out the 
remainder of the strings. 

B:\pem> DEBUG PASS: SYS 

-D 2F5 L F | 

1EC5:02F8 7g 61 73-73 77 6F 72 64 31 29 29 passwordl 
1EC5:9399 29 29 29 29 

-E 2F5 'first password ' 

-D:/3g4 L F 

1EC5: 9390 79 61 73 73-77 6F 72 64 32:29 29 29 password2 
1EC5:9319 29°29 2g 

-E 394 ‘second password’ 

-D' 2F5 L 1E | 

1EC5:92F9 66 69 72-73 74.29 79 61 73 73 77 first passw 
1EC5: 9399 6F 72 64 29 73 65 63 6E-6E 64 29 79 61 73 73 77 ord second passw 
1EC5:9319  6F. 72 64 ord 

-W Ἴ 

Writing 8425 bytes 


Listing 1: Turbo PASCAL Device Driver Display Program 
Program Device Chain; 
type 
( 


This data type defines the structure of the PC-DOS/MS-DOS File Control 
Block and is used by this program to access the pointer to the NUL 
device which heads the chain of device driver entries. 


Most of the record is illustrated for documentation and completeness; 
The actual part that is used to access the device driver chain is listed 
in the documentation as "reserved". Note (in the comments below) that 
the actual location of this pointer in the FCB is different under versions 
2.x and 3.x of the DOS operating system. 

) | 


FileControlBlock = 
Record 

Drive i Byte; 

Filename |: Array [1..8] of char; 
Extension ; Array [1..3] of char; 
CurrentBl : Integer; 

LRL : Integer; 

FilSizeLo : Integer; 

FilSizeHi : Integer; 

FileDate | Integer; 

FileTime  ': Integer; 


For DOS 3.g and later, the FCB Structure should be as follows: 
remove the alternate braces from the following code segment and 
delete the similar code segment which follows it. 


MS/PC-DOS Version 3.x 


: Integer; 
DevOffset : Integer; 
DevSegment: Integer; 
dummy2 1 Byte; 
dummy3 : Byte; 
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ΓΙΠΠΠΠ 
LILILILILI 
EBBUN 
EOOH 
ooog 

LIST 


COLOR COMPUTERS PRICE 


26-3127 64K Extended Color Computer 2 . $199.95 
26-3134 16K Standard Color Computer 2 .. 119.95 
26-3131 Thinline Disk Drive 0 for Color Computer 299.95 
26-3018 Extended Basic Kit 

26-3030 OS-9 With Editor Assembler 

26-3012 Deluxe Jovstick 

26-1208 CCR-81 Recorder 

30001170 VIP Integrated Library 

30001110 VIP Writer 

30001210 Telewriter 64 Tape 

30001220 Telewriter 64 Disk 

30009110 Botek Interface 


TANDY 3000 


25-4001 Tandy 3000 One Disk 512K $2599.00 $1900.00 
25-4010 Tandy 3000 One Disk ἃ 20 Meg HD 512K 3599.00 2600.00 
25-3046 Deluxe Text Display Adapter 249.95 205.00 
26-3047 Deluxe Graphics Display Adapter . 499.95 395.00 
25-4030 512K to 2 Meg Expansion Board . 499.00 395.00 
25-4033 Math Co-Processor for 3000 399.95 339.00 
25-4050 1.2 Meg Disk Drive Kit for 3000 .. 299.95 255.00 
25-4060 Hard Disk Controller Board for 3000 499.00 425.00 
25-4062 20 Meg Hard Disk Kit 799.00 679.00 
25-4101 MS-DOS 3.1/Basic/DeskMate .... 99.95 85.00 
26-5111 VM-1 Monochrome Monitor ...... 199.95 165.00 
26-5112 CM-1 Color Monitor 510.00 


TANDY 100, 200, 600 


26-3901 Tandy 600 Port Comp 32K 312 DD $1599.00 $1195.00 
26-3904 Basic Rom for Tandy 600 129.95 110.00 
26-3910 92K RAM Upgrade for Tandy 600. 399.95 340.00 
26-3860 Tandy 200 Port Comp 24K 799.00 . 650.00 
26-3866 24K RAM Memory Exp Chip for 200 199.95 170.00 
26-3802 Tandy 100 Port Comp 24K 425.00 
26-3816 8K RAM Upgrade for Tandy 100 . . 42.00 
26-3808 Port 3v2 Disk Drive for T100 T200 . 169.00 
26-3815 Portable Disk Case 21.00 
26-3805 Acoustic Coupler 34.00 
26-1409 Printer Cable 12.70 
26-1410 Modem Cable 17.00 


MODEL 4D 


OUR 


$169.00 
99.00 
240.00 
36.00 
59.50 
25.00 
50.00 
139.00 
59.00 
42.00 
49.00 
59.00 














26-1070 Model 4D 64K 2 FD w/DeskMate .$1199.00 
26-1122 64K Memory Expansion 69.95 
26-1123 Model 3 to Model 4 Upgrade Kit .. 399.00 
26-1134 Model 4 HD Kit for 15 Meg 

26-1530 Multiplan Model 4 

26-1595 Super Scripsit Model 4 

26-1608 DeskMate for Model 4 

26-1635 Profile 4 Model 4 

26-2216 CP/M Plus Model 4 

26-2231 Double Duty Utility 


$895.00 
65.00 
385.00 
67.95 
169.00 
169.00 
175.00 
200.00 
127.00 
58.00 





MODEL 6000 COMPUTERS 


26-6021 Model 6000 512K 2 FD Comp ...$4499.00 $3125.00 
26-6022 Model 6000 512K 1 FD 15 Meg HD. 5499.00 3795.00 
26-6019 Model 6000 256K Memory Kit ... . 185.00 
26-6052 DT-100 Data Terminal 600.00 
26-1245 10 Meg Disk Cartridge System ... 1750.00 
26-6018 6000 Interface Kit for 26-1245 . ... 102.00 
25-3022 1000/1200/3000/Interface Kit for 26-1245 160.00 
26-4155 15 Meg Hard Drive Primary 1355.00 
26-4171 35 Meg Hard Drive Primary 2545.00 
26-4173 70 Meg Hard Drive Primary 3350.00 
26-4157 Installation Kit for Primary HD .... 295.00 





349.00 





All prices and offers may be changed or withdrawn without notice. Advertised 
prices are cash prices. C.O.D. accepted ($10.00 charge per carton on C.O.D. 
Call for further C.O.D. information.) M.C., Visa, add 2%. AX, add 3%. All non- 
defective items returned will be subject to 1096 restocking fee. Defective 
items require return merchandise authorization. Call for R.M.A. Number 
before returning. Delivery is subject to product availability. 





CUMRUTERS 























CALL 
1-800-248-3823 


RADIO SHACK PRINTERS 
26-1276 DMP-105 Dot Matrix Printer 


LIST OUR 
PRICE PRICE 


TE $ 199.00 $ 169.00 





26-1275 TRP-100 Portable Thermal Printer. 299.00 230.00 
26-1280 DMP-130 100 cps Triple Mode Printer 349.95 285.00 
26-1268 CGP-220 Color Ink-Jet Printer 699.00 595.00 
26-2830 PC-695 8-Color Digital Plotter .... 799.00 680.00 
26-1277 DMP-430 24 Wire Matrix Printer .. 899.00 635.00 
26-1270 DWP-510 43 cps Daisy Wheel ... 1495.00 1225.00 
26-1274 DMP-2100P 24 Dot Matrix Printer. 1495.00 1195.00 
26-1279 DMP-2200 HiSpeed Matrix Printer. 1695.00 1440.00 
26-1269 PT-64 Printer Controller......... 24995 210.00 
26-1498 SW-302 Printer Switch ......... 119.95 100.00 
26-1447 Bi-Directional Tractor for DWP 510 219.95 186.95 

































TANDY 1200, 2000 
25-3000 Tandy 1200 One FD ἃ. 10 Meg HD . $1999.95 $1525.00 








25-3001 Tandy 1200 Two FD 256K ...... 1499.00 1200.00 
25-3010 VM-3 Green Monitor ........... 219.95 185.00 
25-1022 CM-10 Color Monitor ........... 459.95 380.00 
25-3043 Graphics Display Adapter ....... 299.00 185.00 
25-3044 Graphics Master .............. 695.95 540.00 
25-3061 Captain Multifunction Board ..... 599.95 475.00 
25-3020 TCS-100 Tape Cartridge System . 1999.00 1555.00 
25-3021 TCS-100 Interface Kit 1000/1200 . 149.95 120.00 
25-3130 MSDOS/BASIC ............... 89.95 76.50 
26-5103 Tandy 2000 Two Disk .......... 1599.00 1225.00 






26-5104 Tandy 2000 One Disk & 10 Meg HD 2499.00 
TANDY 1000 
25-1000 Model 1000 128K 1 FD & DeskMate $ 999.95 $ 705.00 


1885.00 











25-1001 Model 1000 256K 1 FD 10 Meg HD 1999.00 1475.00 
25-1003 300-Baud Modem Board 1000/1200 149.95 125.00 
25-1005 Disk Drive Expansion 1000 ...... 199.95 170.00 
25-1006 RS-232C Interface 1000/1200 .... 99.95 85.00 
25-1013 1200-Baud Modem Board 1000/1200 299.95 230.00 
25-1025 10 Meg Hard Disk Drive ........ 699.95 559.00 
25-1007 Hard Disk Control Board ........ 299.95 255.00 
25-1021 CM-4 Color Monitor ............ 299.95 225.00 
25-1022 CM-10 Color Monitor ........... 459.95 380.00 
26-3211 VM-2 Monochrome Monitor ...... 149.95 125.00 


30051030 PJB Multifunction Board 512K 
EPSON PRINTERS 


310.00 























20001015 Homewriter 10............... $215.00 
20001025 LX-80 Dot Matrix Printer ....... 299.00 225.00 
20001035 FX-85 Dot Matrix Printer....... 499.00 345.00 
20001050 HI-80 4 Pin Plotter ........... 599.00 390.00 
20002010 RX-100 Dot Matrix Printer ..... 499.00 400.00 
20002030 FX-286 Dot Matrix Printer ...... 749.00 510.00 
20003020 LQ-800 24 Pin Head Dot Matrix. 799.00 565.00 
20003030 LQ-1000 24 Pin Head Dot Matrix. 995.00 695.00 
10081010 DX-10 Daisy Wheel Printer... .. 299.00 255.00 
10081020 DX-20 Daisy Wheel Printer... .. 459.00 390.00 


10081030 DX-35 Daisy Wheel Printer 


For Technical Questions and Information on our complete line of 
computer accessories and current prices: 


CALL 1-517-625-4161 
FOR ORDERS ONLY CALL 1-800-248-3823 


Mon., Wed. & Fri. 9-9, Tues. & Thurs. 9-6, Sat. 9-3 | 
12H S. MAIN ST. PERRY, MICH. 48872 


DevOffset ; Integer; 
DevSegment: Integer; 
: Integer; 


CurRecord : 

RelRecLo |: Integer; 

RelRecHi : Integer; 
End; 


DeviceHeader = 
Record 

NextHeaderOffset : Integer; Offset address of next device in chain |} 
NextHeaderSegment: Integer; | Segment address of next device in chain ) 
Attributes : Integer; | Device attributes ) 
StrategyEntPt ; Integer; Offset w/i current segment - stragegy } 
InterruptEntPt : Integer; | Offset w/i current segment - interrupt ) 
DeviceName : Array [1.. of char; { Name of the device ) 

End; 


Registers = 

Record 
AX, BX, CX, DX, BP, SI, DI, DS, ES, Flags : Integer; 
End; | 


Str8g = String[89]; 


| 

var 
DeviceControlBlock : FileControlBlock; { File Control Block for NUL Device ) 
Regs : Registers; ( Machine registers for MS-DOS calls) 
DévicePtr : ^DeviceHeader; ( Pointer to the next device header ) 
DevíceSegment zr integer; ( Track the device segment and ) 
DeviceOffset : integer; ( offset while manipulating chain) 


HexStr: Converts the integral value passed by the parameter "number" to a 
string of four hexidecimal character digits. 


function HexStr ( number : integer )' : Str89; 
const 

HexChars : Array[@..15] of char = !'9123456789ABCDEF'; 
var | 

i : Integer; 

temp : Str8g; 
begin  ( function HexStr } 

temp[g] := #4; 

for 1 := 1 το 4 do 
begin | 
temp[5-i] := HexChars[ (number and $9gF) ]; 

number i= number shr 4; 
end; 

HexStr := temp; 

end; { function HexStr ) 


WritePtr: Takes the two integer paramters and prints them in segment 
address format, i.e. SSSS:0000 


Procedure WritePtr( PtrSeg, PtrOfs : integer ); 
begin 

Write( HexStr(PtrSeg), ':', HexStr(PtrOfs), ' 
end; 
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begin. ( Main program Device Chain ) 


LowVideo; 

ClrScr; 

GotoXY(24,1); 

Write('Device Driver'); 
GotoXY(29,2); 

Write('Resident Header Chain"); 
GotoXY(1,5); 


Writeln(' Starting Next Strategy | Interrupt Device’) i., 


Writeln(' Address Hdr Addr | Attr | Entry Pnt Entry Pnt | Name'); ΠΛΉΝ 
Ντιτο]πέ!---------....--------- pasu AEE τί ην ΤΝ 


{ A 1 
Initialize the FCB to zero and set up the NUL device dríver name, Then; 
attempt to open the device for input. If the open ís successful, the 
proper device driver pointer addresses are automatically put in the FOB 
for our use in the rest of the program. | iM 1 


) 


FillChar(DeviceControlBlock,Sizeof(DeviceControlBlock),9); 
With DeviceControlBlock do 
begin 
Filename := 'NUL he 
Extension: ' ^T 
With Regs do 
begin 
AX ;= $@F08; 
DX := Ofs(DeviceControlBlock); 
DS. := Seg(DeviceControlBlock); 
MSDos(Regs); 
If (AX and $9gFF) <> 6 
then 
begin 
Writeln('Error in opening the NUL Device"); 
Halt; 
end; 
end; 
DevicePtr 15. Ptr(DevSegment,DevOffset); 
DeviceSegment := DevSegment; 
DeviceOffset  :- DevOffset; 
end; 


Once the proper addresses have bee established, move backward through the n 
device driver chain, printing the pertinent data as we proceed. The end of l 
the device driver chain is indicated when the "next device offset" address 
is equal to -l ($FFFF), t 

) 


While DeviceOffset — $FFFF do 

With DevicePtr^ do 

begin 

WritePtr(DeviceSegment,DeviceOffset); 
WritePtr(NextHeaderSegment,NextHeaderOffset); 
Write(HexStr(Attributes), ' Di 
WritePtr(DeviceSegment,StrategyEntPt); 
WritePtr(DeviceSegment,InterruptEntPt); 


( 
If the device is a character device (the statement below is TRUE), 
then the "device name" is a valid 8 character representation. ΤΕ... 
the device is a block device (i.e.. a disk drive. etc.) then this 
field usually contains a rumber indicating how many devices are 
supported by the dríver. 

) 


if (Attributes and $8999) — g 
then Write(DeviceName) 
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Listing 2: BASIC Program to Create PASS.SYS 


1g CLS 

20 PRINT "Creating binary file: PASS.SYS" 
30 CHECK.SUM = g 

49 OPEN "R",1,"PASS.SYS",1: FIELD 1, 1 AS D$ 
50 READ N% 

69 IF N*«9 THEN GOTO 199 

76 LSET D$=CHR$(N%): PUT 1: CHECK.SUM = CHECK.SUM 
99 GOTO 5g 

199 READ CHECK2 

119 IF CHECK2<CHECK.SUM GOTO 149 
120 PRINT "FILE PASS.SYS CREATED SUCCESSFULLY" 
138 CLOSE: END 

149 PRINT "FILE CREATION ERROR" 
159 CLOSE: KILL "PASS.SYS": END 
299 DATA 255, 255, 255, 255, 
219 DATA 36, 32, 
229 DATA 129, ᾳ, 
238 DATA 129, g, 
249 DATA 

259 DATA 

269 DATA 

279 DATA 

280 DATA 

299 DATA 

399 DATA 

319 DATA 

329 DATA 

339 DATA 

348 DATA 

359 DATA 

368 DATA 

37g DATA 

389 DATA 

399 DATA 

499 DATA 

419 DATA 

429 DATA 

439 DATA 

449 DATA 

459 DATA 

469 DATA 

478 DATA 

489 DATA 

499 DATA 

50g DATA 

519 DATA 

529 DATA 

530 DATA 

540 DATA 

558 DATA 

569 DATA 

579 DATA 

586 DATA 

596 DATA 

68g DATA 

619 DATA 

629 DATA 

636 DATA 

649 DATA 

659 DATA 

669 DATA 
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rIicic CIP iF 
ELECTRONICS 


S- Model 2000 by Tandy" 
leido do o MS-DOS Based 


Computer System 


1319.00 
1629.00 

256K MOD 1200 HD2DR. ................. 1499.00 

128K MOD 1000 W/MONO 1 DR 

128K MOD 1000 W/COLOR 2 DR. 

256K MOD 1000 W/HARD DISK 

24K MOD 100 PORT 

24K MOD 200 PORT 

64K MOD 4D 2 DR 

512K MOD 6000 2DR. 

512K MOD 6000 w/15MEG HD 

15 MEG HARD DISK 

35 MEG HARD DISK 

DMP 105 PRINTER 

DMP 2200 PRINTER 









































DWP 510 PRINTER 
TRACTOR DWP 210 


PARALLEL PRINTER CABLE 
DISK VIDEO INTERFACE 
32K MOD 600 PORTABLE 
512K MOD 3000 


100% RS COMPONENTS NO FOREIGN DRIVES OR MEMORY FULL WARRANTY 
ALL RS SOFTWARE 20% OFF CATALOG PRICE 
CASHIERS CHECK OR MONEY ORDER MUST ACCOMPANY ALL ORDERS 


(817) 825-4027 


NOCONA ELECTRONICS « Box 593 * NOCONA, TX 76255 





679 DATA 

689 DATA 

699 DATA 

799 DATA 

719 DATA 

726 DATA 

736 DATA 

749 DATA 

759 DATA 

769 DATA 

779 DATA 

789 DATA 

799 DATA 

899 DATA 112, 
819 DATA 199, 
829 DATA 19, 
830 DATA 10, 
849 DATA 19, 
859 DATA 32, 
869 DATA 10, 
879 DATA pg, 
889 DATA p, 
899 DATA pg, 
99g DATA p, 
919 DATA p, 
929 DATA Ø, 
939 DATA -1, 73765 


Listing 3: PASSI.ASM 


; :bkeg 
r; "55448 
page69,132 


;This program shell was taken from the article "Building Device 
;Drivers" by Stan Mitchell in the May 1985 issue of PC Téch 
iJournal beginning on page 76. 


titleDevice Driver Construction Program 
nameddriver 


esegsegmentpara ‘public’ 'CODE’ 
assumeds:cseg,cs:cseg 


ddriverprocfar 


begin; 


Initialize’ 8 constants for Character Device Name Lol 


in namemacro 
x=9 

rept8 

x=x+1 
charsp$x 
endm 

endm 


;Assign each letter of Character Device Name το a constant 


, 


huminta 
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mknamemacronlist 
x-g 

irpem,nlist 
x=x+1 
charequ$x,m 

endm 

endm 


;Assign constant the ASCII value of z 


, 


charequmacroy,z 
n&ys'&z' 
endm 


;Assign constant the ASCII value of ' ' 


charspmacroy 


;Convert ASCII constants to a string of DB constants 


, 


ddnamemacro 
x=9 

rept8 

x=x+1 
chardb$x 
endm 

endm 


;Convert an ASCII character to a DB constant 


chardbmacroy 
dbn&y 
endm 


;Define a Device Header Structure 


devhdrmacronxtoff,nxtseg,attrib,strat,intrpt 
dwnxtoff 

dwnxtseg 

dwattrib 

dwstrat 

dwintrpt 

ddname 

endm 


;DEF = true if this function is to be implemented 

;NAME = name of the function to be defined 

;ENTRY = label of the function entry point or the exit point 
yif the function is not defined 


, 


function macrodef,name,entry 
, &nameequdef 

if &name 

ifndefentry 

extrnentry:near 

endif 

endif 

.&nameequentry 

endm 
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; 
¿Static request header 


> 


Ingequ?; BYTE: first byte is length of the request header 
unitequl;BYTE: unit number for block device 
cmdequ2;BYTE: request command code 

statequ3;WORD: status 

dos qequ5;DWORD: DOS queue 

dev qequ9;DROWD: device queue 


;INIT Header 


, 


unitsequl3; BYTE: number of units 

brkoffequl4;DWORD; ending address for resident code 
brksegequl6 

bpbequi8;DWORD: pointer to the BIOS Parameter: Block 
paramsequl8;DWORD: pointer to the string following the 
i "devices' command in CONFIG.SYS 


;Non-destructive read -- no wait 


precharequl13;BYTE: one look-ahead character 


;input, Output, IOCTL In, IOCTL Out 


> 


mediaequi3;BYTE: | media descriptor byte 
bufequl4;DWORD: pointer to buffer address 
entequl8;WORD: byte/sector count 
startequ29;WORD: starting sector number 


;Status word byte definitions /|-- most significant byte 


reqdonequglh;Requested command complete 
busyequ92h;Device busy 
errorequ80h;Device error encountered 


;Status word error codes -- least significant byte 


notrdyequg2h;Device is not ready 
unkcmdequg3h ; Unknown device command 
nopaperequg9h;Printer out of paper 
wrfltequgah;Device write fault 
rdfltequgbh;Device read fault 
failequgch;General device failure 


1 ο κκ ΚΟ ολο ολλ Αλλο ολλ σολ οσο ο ο οσο σος 


;DEVICE DEFINITION: FILE 


, 


) PRAIA IIIA AIA APSA AI ADI I PIP SSIES DADE SEPA PRBS SAPP ISS SDAA ASR SPE LOPES V IAAI ASE 


trueequl 
falseequg 


in name;Initialize device name to blanks 


jeieteieieieiieieieideieieteieleicieicieicieinierieteieieleicieieieieteieteteieterieteiekejejetejetetesetetetetetedetefejetelelejejeletetetedeyeseseye 


iSelect DOS version number: 
;For DOS 2.x set Ρ0ΟΒ2 x to true 
;For DOS 3.x set DOS2 x to false 
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DOS2_xequfalse 
DOS3 gequtrue 


pycieieieioieieieteieteicieieieieteieteicieieieielcieieieteieteieicieicieieieteieieieieieietetetekeieicieteteteietejeteieteietejetejetcieietejeteieteteteje 


;Enter the device driver name here in place of the X's 
;(1 to 8 characters in uppercase) 


;imknameXXXXXXXX 


mknamePASSWDS$ 


; Yrleteieieieieicieicicieieicieieieieieieleicieicieieieieieieieieteieieleieieieieicieieicieieieieieteicieleieieieieleieiekejeieteteteiejetedeleleieieietee 


;Select the attributes for the device from the following table: 


;Defined attribute bits: 


chrequ89g99H;Character Device 
ioctlequ499@H;I/O Control Functions supported 
ibmequ2999H;Block Device is IBM format 


1Ε5053 g;Open, Close, and Removable Media 
ocremequg899H; is supported for DOS 3.x 
endif 


specialequg819H;Special Device using INT 29H handler 


clockequg998H;Device is current CLOCK device 
nulequgg94H;Device is current NUL device 
stdoutequgg92H;Device is current standard output device 
stdinequ99@1H;Device is current standard input device 


;Example: chr+special+stdout+stdin 

;defines a character device using a special INT 29H handler 
;to support STDIN and STDOUT and this will generate an 
;attribute word of 8913H 


;Edit the line below to select the correct attributes for your device 
attribequchr;Device is a character device 


;Each line in the function table contains 3 arguments: 

;#1 is true if the function is defined, false if not 

;*2 is the name of a valid function to which the true or false 

$ value applies 
is the label which is defined as the entry point for this function. 
If the function is not to be implemented, "done", "done2", "xfer", 
or “invalid" should be used. Also note that the Function macro 
defines the entry point label as "external" if it is undefined in 
the current program. 


function true,init,passinit 
function false,media check,done 
function false,build bpb,done 
function false,ioctl in,done 
function false,input,done 
function false,nd input,done 
function false,in stat,done 
function false,flushin,done 
function false,output,xfer 
function false,voutput,xfer 
function false,out stat,done 
function false,flushout,done 
function false,ioctl out,done 
ifDOS3 9 

function false,open,done 
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It’s the Holmes ___It’s the Holmes Engineering/PCSG “chipmunk” — PCSG “chipmunk” 







Uses the main menu concept. You see the 
disk directory instantly, arranged on your 
M-100 screen like your main menu. Just move 
the widebar cursor and transfer files with a 
function key. You can run a file directly from 
the diskette with the ENTER key. Uses 3'^" 
microfloppy diskettes that have a rigid plastic 
casing and a metal core. They’re tough and 
nonflexible. You can carry several in a shirt 
pocket without damage. There’s 358K on a 
diskette. Ten of these in your briefcase and 
you've got 3^ megabytes. 

Drive weighs only three Ibs. and it works 
directly from the 110 outlet and recharges at the 
same time. It recharges in six hours with 
thousands of pages transferred between 
charges. It’s compact, with dimensions of 21⁄4” 
x 5%" x 7,5"; and fits easily into your briefcase 
along with your Model 100 or 200. 

Machine code programs, BASIC pro- 
grams, Lucid files and documents all are saved 
and retrieved with no protocol- instantly, ready 
to run. 

In a special association, Holmes En- 
gineering and PCSG have worked together 
combining the hardware knowledge of Holmes 
and the software expertise of PCSG. The re- 
sult is a product that can only be regarded as 
excellent. 





You see the disk directory 
instantly; works just like the 
main menu 





Here is what is really exciting. The port- 
able disk drive has Random Access. Included 
as part of the operating system in the drive 
(ROM) is a very powerful disk BASIC. 

This means that you can have BASIC 
programs that will access the diskette and read 
and write records directly on the diskette. 


Just imagine yourself with this kind of 


capability. 


—r PCSG offers a 30-day/money-back trial! πα 


ASK ABOUT 
BUDGET MODEL 
$399. 


Database — The portable disk drive stores 
your mailing list, inventory items, part #s and 
descriptions or any other data that you need 
to recall. 





358K on a diskette 





Invoice (purchase order)—At the touch of 
a button you can print out your sequentially 
numbered, professionally done invoices. This 
is truly professional invoicing capability. 

Purchase orders are just as easy. 

Sort — This excellent utility allows you 
rapid sorting of any records you have compiled. 
You can write the newly sorted list back in the 
same file on the diskette or to a new file. 

Telecom interface —1f you are a user that 
likes to access other computers or databases 
(for example CompuServe) by telephone then 
this powerful facility alone is worth the price of 
the disk drive. You can automatically download 
and upload information onto the diskette. 

Calendar — Everyone who has seen this 
program has said, *‘This is the first calendar/ 





Includes a library of 
six powerful programs 


for the Model 100/200 
NEW LOW PRICE 






$499. 


diary/scheduler on any computer anywhere that 
I can use. It is so functional." 

The calendar program is usable for two 
reasons, first it is designed correctly, and 
second you have the memory (358K) on the 
diskette to log and access a tremendous amount 
of notes over a long period of time. 

Personal Finance Manager — This 
wonderful program truly lets you keep track of 
your finances. 

All your records are kept on the diskette. 
Bank accounts (checking and savings) and 
charge accounts such as MasterCard and Visa. 

We at PCSG believe we have the ultimate 
Model 100 system, the Portable Disk Drive 
plus the Lucid spreadsheet on snap-in ROM, 
Write ROM word processing and the new 64K 
RAM expansion now available from PCSG. 

We want you to find out for yourself at no 
risk. If you aren't totally satisfied within 30 
days, simply return the disk drive for a full 
refund. Priced at $499.00 , including the soft- 
ware library. MasterCard, Visa, COD. 


RORIABLE. 
COMRUTER - 
«ΠΟΙ 


LOCOS 
1-214-351-0564 


11035 Harry Hines Blvd., 4207 
Dallas, Texas 75229 





function false,close,done 
function false,removable;done 
endif 


devhdr-1,-1,attrib,strat ent,int ent 


;Function Table Definition 


funtbllabelbyte;CodeFunction 


dw.init;  9Initialization 

dw,media check; 1Block device media check 
dw.build bpb;  2Block device build BPB 

dw. ioctl in; | 3lIOCTL Input 

dw.input; 4Device input command 

dw.nd input; ^ 5Non-destructive input 
dw; in stat;  6Device input status 
dw.flushin; | 7Flush input 

dw.output; 80utput to device 

dw.voutput;  9O0utput to device with verify 
dw.out stat; lgOutput status 

dw.flushout; llFlush output 

dw, ioctl out; 1210CTL output 


4ΕΡΟΒΒ 9 

hifuncequl5 

dw.open; l30pen Device 

dw.close; 14Close Device 

dw. removable; 15Removable) media check (Block Device) 


else 
hifuncequl2 


endif 


publicreqhdr, done, invalid, done2,errout;xfer 


Define the request header pointer 


reqhdrlabeldword 
reqhdrodw?;header offset value 
reqhdrsdw?;header segment: value 


;iDefine the device Strategy Entry Point 


> 


strat ent: 

movcs: ireqhdro, bx;Save the offset of the request header ptr 
movcsireqhdrs,es;Save the segment of the request header ptr 
ret;Far return 


‘Define the device Interrput Entry Point 


, 
‘Note: DOS's' stack allows saving the registers but if your routine 
¿needs more stack space than that, you should define a local stack 


» 


int emt; 

pushf;Save the flag status 

cld;Set UP direction for string operations 
pushsi;Save processor registers 

pushax 

pushex 
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pushdx 
pushdi 
pushbp 
pushds 
pushes 
pushbx 


ldsbx,cs;reqhdr;DS:BX points to the request header 
movex,[bxt*cnt];Get the byte count for the operation 
moval,[bx*cmd];Get the device command byte 
eupal,hifunc;Test for an invalid code 

jainvalid;Post error and return if out of range 
xorah,ah;Double the command code for an offset 

rolal;l; into the jump table 

leasi,funtbl;Set up pointer to function table 
addsi,;ax;Get correct entry 

lesdi,dword ptr [bx+bufi];ES:DI points to command buffer addr 
pushes i 

popds;Set DS register properly 

jmpword ptr [si];Enter proper command routine from table 


invalid: 
moval,unkemd;Set unknown command error 
sub[bx+cent] ;ex;Zero the byte count 


errout; 
movah,errorrreqdon;Set error and done bits 
jmpshort exit 


done2: 
movah,reqdon+busy;Set done and busy bits 
jmpshort exit 


xfer: 
ldsbx,cs:reqhdr;Get pointer in DS:BX for request header 
sub[bx*ent];ex;Return number of bytes transferred 


done: 
movah,reqdon;Set done status bit 


exit: 
ldsbx,cs:reqhdr;DS:BX set to request header pointer 
mov[bx-*stat],ax;Set status return value 


popbx;Restore processor registers 
popes 

popds 

popbp 

popdi 

popdx 

popex 

popax 

popsi 

popf 

ret;Return to operating system 


PRAIA Jejefejereteieteieicieieieretertereteicieieicieteieieeietejotetejetereteteroteieieieieteietieeteteieteredejetejeteietetredetetererjeferjeteyetese 


ddriverendp 
csegends 


endbegin 


Listing 4: PASS2.ASM 


; :bkeg 
; :ts-8 
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page69,132 
namepassword 
titlePassword Validation Routine 


„sall 

; Yeyciciciedciciciciciricicicieyeieiofoiciciciririciciciericiciecicicieicicioioicicicicicicicicicicicicicicicioicircicicicicicicircicicicicycicioleoiciciciecicioce 
; 

;PASSWORD -- 


;Read a password from the keyboard and return control to the 
;user if the password is valid. ΤΕ the password is not valid, 
;"hang" the system and force a system reset. 


¿PASSWORD uses only DOS function calls less that CH to allow 
;it to function as an "installed" device driver and prevent 
;user interruption of the validation routine during boot-up 
;of the system. 


;Using these MS-DOS normal function calls, PASSWORD should 
;operate on any machine using the MS-DOS operating system. 
;Thís means that you should be able to use this routine on 
;all non-compatible machines such as the WANG and ZENITH 
;systems. 


;Written by: 


;LCDR John B. Harrell, III 
31519-A Carswell Circle 
;Bolling Aír Force Base 
;Washington, DG 29336 


5 


;Date written: 
122 January 1986 


;Modifications: 

27. February 1986 -- added additional code to clean 
;up the password handling and make this routine 
;compatible with all DOS releases. PC-DOS 
;version 2 did not like the specíal characters 

;in the device driver header. 

;9 February 1986 -- added a second password routine 
jwhich is accessible after booting the system, 
jAny user program can require password valid- 
;ation to continue by using this Interrupt 67H 
;function call, This call will not force a 
;system reset. 


;Static request header 


lngequg;BYTE: first byte is length of the request header 
uniítequl;BYTE: unit number for block device 
cmdequ2;BYTE: request command code 

statequ3;WORD: status 

dos qequ5;DWORD: DOS queue 

dev qequ9;DROWD: device queue 


; 
;INIT Header 


> 
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We would like to take this opportunity to introduce ourselves. Although Ross Computer Services is a new 
name to the pages of this magazine, we are NOT new to computers. We have been suppling computer dealers 
with many of the products they sell for several years. We have decided to end that relationship, and to sell 
directly to you, the end user. 


ROMDSK. 8K or 32K CUSTOM expansion rom for 

the TRS-80 Model 100. Custom programmed with 

YOUR programs. 

8K $49.95 32K $69.95 

Call or Write ROSS COMPUTER SERVICES 
For Ordering Information 


The SMART Software System, from Innovative Softwear. 
The SMART DATA MANAGER 


The SMART SPREADSHEET (With Graphics) 
The SMART SPELLCHECKER 


The SMART SYSTEM” 


*The SMART Software System includes: The Smart Data Manager, The Smart Spreadsheet with Graphics, and 
The Smart Word Processor, and can only be sold as a system, not as individual products. The smart Software 
System includes built in asynchronous communications and personal time management programs. 


BORLAND 


INTERNATIONAL 





Turbo Tutor 

Turbo Pascal 3.0 

Turbo Pascal with 8087 

Turbo Pascal with BCD 

Turbo Pascal 3.0 with 
both 8087 & BDC 


Turbo Database Toolbox .... 


Turbo Graphix Toolbox 
Turbo Editor Toolbox 
Turbo Gameworks 


Superkey e$ 
SideKick (copy- protected) ..$ 54.95 
SideKick 

(NOT copy-protected) ....$ 84.95 
Traveling SideKick 

(when available) ........$ 69.95" 
Traveling SideKick 

with SideKick (NCP) 
Turbo Lightning 
Reflex: The Analyst 


$ 69.95 
*Traveling SideKick should be available by the time you read this ad. 


MERCURY 300/ 

1200 MODEM 
Mercury 300/1200 
auto-answer/auto-dial, 
HAYES compatible 


nd Uses the industry sms AT — 


SPECIAL 


Ross Computer Services is a division of a company that has been 
in business for over 54 years. We are not likely to fold our tents, 
and steal into the night. We will sell only the highest quality hard- 
ware and software. Though our initial offering is limited, we will 
be constantly adding to our product line, again, adding only 
$199.95 products of the highest quality. 


Ross COMPUTER SERVICES 
(816) 363-2545 | 


Hours: 8:30 to 50 5 : 


After 5:00 you will reach our order line BBS 
1800 W. 91st Place e Kansas City, MO 64114 





unitsequl3;BYTE: number of units 

brkoffequl4;DWORD: ending address for resident code 
brksegequl6 

bpbequl8;DWORD: pointer to the BIOS Parameter Block 
paramsequl8;DWORD: pointer to the string following the 
: "device-' command in CONFIG.SYS 


, 
;Non-destructive read -- no wait 


precharequ13;BYTE: one look-ahead character 


;Input, Output, IOCTL In, IOCTL Out 


mediaequl3;BYTE: media descriptor byte 
bufequl4;DWORD: pointer to buffer address 
cntequ18;WORD: byte/sector count 
startequ29;WORD: starting sector number 


;Status word bite definitions -- most significant byte 


reqdonequglh;Requested command complete 
busyequg2h;Device busy 
errorequ8gh;Device error encountered 


;Status word error codes -- least sígnificant byte 


notrdyequg2h;Device is not ready 
unkcmdequg3h;Unknown device command 
nopaperequg9h;Printer out of paper 
wrfltequgah;Device write fault 


rdfltequgbh;Device read fault 
failequgch;General device failure 


lfequlg;Line feed code 

crequl3;Carriage return code 

bsequ8;Backspace code 

bellequ7;Bell tone code (beep) 

ulineequ' ';Underline character 
voidlineequ27;Character used to void the line 
blankequ' ';Blank character 

echo charequ'*';Password echo character 
eosequ'$';DOS End-of-string character 

pass lengthequl5;Maximum password character length 
dosintequ21h;MS-DOS function cmd processor inrpt 
vector67equ67h*4;Offset in page Ø for interrupt 67 


Jeieieieieieieieieieieieieieieieteicieieieieieteieieieteieicieieieieieieieieieteteieteieieieteleieietetetetejeketetejeietetejetetetetetetetetededetetededete 


;Macro Definitions 


;charin 

;Reads the next character available from the keyboard and 
;returns ít in the AL register. The character is not echoed 
;to the display and no checking for control characters is 


;performed. 


charinmacro 
movah,7 
intdosint 
endm 
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;dispstr H 


;Display the string located at the data offset passed as à 
;parameter to the macro. The string is displayed until a 
;terminal '$' character is located (standard MS-DOS terminal) 


díspstrmacrostr 
movah, 9 
movdx,offset str 
intdosint 

endm 


;dispch 
;Display the character passed as a parameter on the video 
;display 


dispchmacrochr 
movah,2 
movdl,chr 
intdosint 

endm 


csegsegmentpara public "CODE" 
assumeds}icseg,cs:cseg,ées;}cseg,ss:cseg 


extrnreqhdr:dword 
extrndone:mnear 
publicpassinit 


| JoOOolcjeieieteicieicieieieieieieteteieteteieieteieteieteteteicieietieieiedieieteieieiteterieteteiekekeieicieietedrteteiedetededetetetetejetetejejekede 


» 


;passinit -- 

;Entry point for user password entry during system 
;startup. If the password is not valid, the system 
;will hang up and require a reset 


passinit procfar 


movax,ss;Set up a temporary stack and save SS 
movbp;sp;Current SP to BP - BP is not used 

movdx,cs 

movss,dx | 

movsp,offset stack;Set new stack offset in this Code segment 
pushax;Save stack segment on new stack 


xordx,dx;Clear DX register 

moves,dx;Point to first page segment 

cli;Disable interrupts momentarily 
movbx,es:[vector67];Get the offset of current intr 
movword ptr [oldint67],bx;Save address 
movbx,es:[vector67+2] 

movword ptr [oldint67+2],bx; and segment for later use 


movbx,offset passint;Set new interrupt offset 
moves: [vector67], bx 

movbx,cs;Set proper segment address 

moves: [vector67+2] ;bx 

sti;Re-enable interrupts 


pushes 
popes;Set ES register to Code Segment 
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leaax,cs:word ptr rel addr;Terminal address for device driver 
movdx,cs;Segment of terminal byte 

ldsbx,cs:xeqhdr;DS:BX points to INIT request header 
mov[bxrbrkseg],dx;Store segment address for return 
mov[bx*brkoff],ax;Store offset 

pushes 

popds; Restore DS register 


movbyte ptr[pwflag],g;Set up scan with boot password 
callpassword;Read actual password from user 


popss;Restore original stack segment address 
movsp,bp;Restore stack offset pointer 
jmpdone;Return to device driver 


passinit endp 


; Wi*eioininieieleleicieieieleleieieieicicicicieleicieicieieieicieieinieieieieieieicieieieieieieieieieieieteieteteieieieleteteleletejeieeietetetetesedefedele 
;passint -- 

>This is the interrupt handler entry point for the newly 

;defined INT 67H call (see above). First, call the old 

;veetor and then handle the password. Á valid password 

;will return @ in the AX register, nonvalid will return 

;7l in AX, ALL other registers will remain unchanged. 


passintprocfar 


pushf;Save the flag status 
cld;Set UP direction for string operations 
pushsi;Save processor registers 
pushax 

pushex 

pushdx 

pushdi 

pushbp 

pushds 

pushes 

pushbx 


pushcs;Set up DS segment 
popds 


movax,ss;Set up a temporary stack and save SS 
movbp,sp;Current SP to BP - BP is not used 

movdx,cs 

movss,dx 

movsp,offset stack;Set new stack offset in this Code segment 
pushes 

popes;Set ES and SS registers to Code Segment 

pushax;Save stack segment on new stack 


movbyte ptr[pwflag],-l;Set call for user password 
callpassword;Read actual password from user 


popss;Restore original stack segment address 
movsp,bp;Restore stack offset pointer 


popbx;Restore processor registers 
popes 
popds 
popbp 
popdi 
popdx 
popex 
popax 
popsi 


movax,cs:word ptr[retflag];Get return result 
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popf 
iret 


passintendp 


; IIASA DI IASI IIS IA ASIA IIASA AIA AIA PASI AIA SI IIASA IASI AAA ISAS AISA IAI AS AISA ISA IAIG. 
;password 

;Read password from user for initialization and subsequent 

;calls for file input 


password procnear 
dispstrsignon; Display sign-on message 


movcx,pass length;Clear the input string to blanks 
moval,blank 

movdi,offset pword;ES:DI points to target area 
cld;Set string move direction = UP 

rep stosb;Clear the string 


callget password;Get and validate the password from user 
movax,word ptr[retflag];Get return code 

orax,ax;Check return code for good password 

jzpw ok;Password validates -- release system for user 
moval,byte ptr[pwflag];Test for initial or interrupt password 
cmpal,g;If not equal, Interrupt 67H entry 


jnepw exit;Set return code and exit 


dispstroops msg;Let the user know he is FUBAR 
pw bad:jmpshort pw bad;Initial entry - hang up the system in a loop 


pw ok:dispstrthanks msg;Thank user and sign-off 


pw exit: 
ret 


password endp 


;get password 
;Get the password from the user and then validate it 


get password proc near 


callread pw 
callvalidate 
ret 


get password endp 
; REAP IA IAAI AAI AIA ASAI PAI II IAD A DAA A AAD ISA IS IIIS IIAP IATA II AI III IIIS ατα 


, 


;read pw 
;Read the password from the user and store the characters in 
;the array located at offset "pword". 


;Read pw allows use of the backspace key to remove one character 
;at a time from the input line or use of the Escape key to void 
;the entire input and return to the start of the entry. 


¿This routine will exit only after the Enter (Return) key has 
;been pressed. 
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read pwprocnear 
xorbx,bx;Clear the array index 


read pwl: 

charin;Get the next character from the user 
empal,cr;Test for carriage return 

jzshort read pwx;Exit routine if found 


cmpal,bs;Test for backspace key 
jzshort read_bs;Delete one character 
cmpal,voidline;Test for line delete 
jzshort read void;Delete entire line 


cmpbx,pass length;Check for at end of allowable entry 
jgeread pwl;Yep -- loop for carriage return 

movbyte ptr pword[bx],al;Store character 

incbx;Bump pointer 

dispchecho char;Display echo character for user response 
jmpread pwl;Continue to read characters 


read bs: 

cmpbx,g;Check for at start of line 

jleshort read pwl;Yep --'no backspace allowed 
decbx 

movbyte ptr pword[bx],blank;Zap this character 
callerase;Update screen 

jmpread pwl;Back for more characters 


read void: 

empbx,g;Check for at start of line 

jleshort read pwl;Yep -- no backspace allowed 
decbx 

movbyte ptr pword[bx],blank;Zap this character 
callerase;Update screen 

jmpread void;Erase remaining characters 


read pwx: 
ret 


read pwendp 


;erase 

;Erase the last echo character from the video screen by 
;sending the sequence of characters: backspace, underline, 
;followed by backspace. 


eraseprocnear 


dispchbs; Backspace one character 
dispchuline;Send one underline character 
dispchbs;Backspace one character 

ret 


eraseendp 


{RAAT λ RAI AAA IIASA AAAI IAAI ASAI AISA SRA A ASIII STAI IAA ASI STASI IAAT III κ IKI. 
;validate 

;Validate the password entered by the user, comparing it 

;byte for byte with the constant stored at offset "pconst" 

;the string must be an exact match to validate, case considered 


;If the password is valid, set "retflag" zero, otherwise 
;non-zero. 
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validate procnear 


moval byte ptr[pwflag];Test type of entry + initial or intr 
cmpal,g;If not equal, then intr entry 

jneshort val intr | 

movsi,offset initpw;set DS:SI to proper constant password 
jmpshort val g;Check password 


val intr: 
movsi,offset userpw 


val f: 

movdi,offset pword;ES:DI points to user input 
movex,pass length;Get compare length 

repz cmpsb;Compare strings 

movax,g;Initialize return flag 

jzshort validate x;Compare was ok -- password checks 
decax;Set return flag 


validate x: 
novword ptr[retflag],ax;Set return code 
ret 


validate endp 


p AIR IPA IARI AAAI ARIA IPRA IIIS AISI SILLA IED IPRS IPSS PIELER IESE DIPPED FFB 


;Data Definition Area 


oldint67 dd? 


pwflagdbg;Flag for which type of password 
retflagdw;Return result word for INT 67H 


pworddbpass length dup(?);User input area 


initpwdb'dos wizz';Constant password value 
iplenequ$-initpw 
db(pass length-iplen) dup(blank); fill remaining length 


userpwdb'jbhiii';Constant password value 
uplenequ$-userpw 
db(pass length-uplen) dup(blank);fill remaining length 


sígnondbcr,25 dup(1f) 

db'PASSWORD V2.9',cr,lf 

db'Written by John Harrell',cr,l1f,l1f,lf 
db'Please enter the correct password and',cr,lf 
db'press the RETURN key to continue: 3 

dbpass length dup(uline) 

dbpass length dup(bs) 

dbbell,eos 


oops msg dbcr,25 dup(1f),5 dup(bell) 

db'You have entered the wrong password --',cr,lf,lf 
db'You must reset the computer and try again',cr,lf 
db'or call the owner to proceed!',cr,lf,lf 

db'I am now DEAD!!!",cr,5 dup(lf) 

db5 dup(bell),eos 


thanks msg dbcr,25 dup(1f) 
db'Thank you!’ 
dbcr,19 dup(1f),eos 


dw64 dup(?) 
stackequ$ 


rel addr = $;Device driver can release code after this 
esegends 


endpassword 
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WEIT. BASIC Bytes 1000/1200/2000/3000 


This month, we introduce you to a series on beginning BASIC programming . . . 


Welcome to BASIC 


important question these 


By Richard A. White 
days is what is BASIC's 


A place in the world of mi- 


crocomputing? Over the past few years 
the IBM PC and its compatibles have 
arrived, followed by a vast outpouring 
of software of every description. Each 
machine comes with a BASIC language 
interpreter on its DOS disk. 

It is likely that only a small percent- 
age of these interpreters have been 
loaded for the purpose of doing pro- 
gramming. A much larger percentage 
have been loaded for the purpose of 
running some existing BASIC program. 
This only reflects that early microcom- 
puter owners were as interested in the 
machines themselves as they were in 
running applications, while more recent 
purchasers are buying machines to run 
applications only. 

The market shift is also exemplified 
by the documentation supplied with the 
machine. When I got my first micro- 
computer in 1980, its manual was 
mainly concerned with how to program 
in BASIC. The Tandy 1000 comes with 
Desk Mate and its documentation, 
enough imformation on MS-DOS for 
the user to get Desk Mate up and run- 
ning, and virtually no information on 
the BASICA interpreter that is on the 
DOS disk. Most of the thousands of 
folks who purchased Tandy 1000s be- 
fore Christmas 1985 are probably un- 
aware that they have BASICA on their 
DOS disk, or even what BASICA is for. 

The role of BASIC has obviously 
diminished, but it is by no means a dead 
language. It comes with all Tandy 
machines and is available for develop- 


Richard White has a long background 
with microcomputers and specializes in 
BASIC programming. He has authored 
numerous programs and articles. His 
work has also appeared in PCM 5 sister 
publication, THE RAINBOW. 
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ing those special applications for which 
software cannot be purchased. It is 
much easier to use for small programs 
to accomplish specialized tasks that 
cannot be done in a spreadsheet, for 
example, than most any other language. 

Thumb through a few PCMs and 
you'll see most of the programs are 
written in BASIC, with good reason. It 
is the language available to everyone. A 
published BASIC program is potentially 
usable by any PCM reader, while a 
program in any other language is usable 
by only a small percentage of the read- 
ership. 

Given this situation, we feel it is 
useful to provide a series of columns on 
"Beginning BASIC Programming." Early 
in PCM 's history, I did a similar series 
on Model 100 BASIC. This time we will 
use BASICA, which comes with the 
Tandy 1000, 1200, 2000 and 3000. I will 
focus on a simple subset of the com- 
mands available and avoid detailed 
description of seldom-needed options. 

Over the years, BASIC has been criti- 
cized by computer scientists and sup- 
porters of competing languages. Some 
of this criticism was justified. But 
BASICA for the Tandy MS-DOS ma- 
chines is the result of years of refine- 
ment and is now much more powerful 
than any BASIC available, even five 
years ago, on any machine. Still, it is an 
interpreted language. This means BAS- 
ICA must take each command it comes 
to in the program and look up a ma- 
chine language routine to perform that 
command; this takes time. Borland's 
Turbo PASCAL, which has sold over 
400,000 copies, is BASICA's major com- 
petitor. Its final product is machine 
language, where the machine language 
routines to perform each command are 
included directly in the program to be 
executed. This is called a compiled 
program and, since the computer is not 
continually looking things up, it is 
lightning fast. 


However, many computer tasks do 
not need that speed. A data entry 
program is human paced, for example. 
And, the way the program is written can 
have a drastic effect on its speed. I am 
reminded of a friend who came to me 
with a program to analyze survey data. 
It was very slow under BASIC and he 
wanted a machine language version to 
speed things up. As I considered how to 
do this, it occurred to me that I could 
use arrays in BASIC to model how a 
machine language program might 
work. It turned out that the rewritten 
BASIC program was more than 10 times 
faster than the first version, and I never 
had to write a machine language ver- 
sion. 

This paid off later. The original 
program was on a non-MS-DOS ma- 
chine. We came to an application that 
was to run on an IBM PC. With minor 
editing, we were able to bring the BASIC 
programs over to the PC. If there had 
been a machine language module it 
would have needed total rewriting. 

The single most valid criticism of 
BASIC is that it imposes no structure or 
discipline on the programmer. A pro- 
gram can be written almost any way you 
want. The simple can be made complex 
if you do not do some planning first and 
impose some self-discipline. PASCAL 
was written partly in reaction to BASIC's 
total lack of inherent structure. PASCAL 
demands specific structuring for the 
program to work. All variables must be 
defined at the beginning of the source 
code or at the beginning of the proce- 
dure or function where they are used. 
All procedures and functions that the 
main procedure uses must be in front of. 
the main procedure in the source code, 
or there must be instructions on how 
PASCAL finds the procedure. How the 
procedure itself must be constructed is 
also defined. 

BASIC requires none of this. On the 
other hand, the more structure the 





programmer can bring to a BASIC pro- 
gram, the better. One way to do this is 
to develop standard subroutines and 
put them in standard locations in each 
program. For example, there are many 
times when it is handy to get a single 
character from the keyboard, which 
may be the starting letter of a menu 
choice. The program then branches 
according to what the letter is. The 
computer may be in lowercase or upper- 
case. It simplifies the code if it needs to 
look for only a lowercase or uppercase 
character, but not both. 

The subroutine listed here loops until 
it gets a character. It checks if the 
character is lowercase, ñSC ( I$ )>96. If 
so, 32 is subtracted from the ASCII 
value of the character and the resulting 
number is converted back to character 
form with I$-CHR$(RSC(IS$)-32). 
The program returns to the line that 
called the subrouting. If the character is 
not lowercase, no conversion is made 
and the return is made immediately. 


l IS-INKEYS:IF 19-"^ THEN 1 
ELSE:IF RSC(IS)296 THEN : 
/IS=CHRS(ASC( 1S) -32) RETURN 
ELSE RETURN 


In this bit of program, or code, the 
computer gets a user input from the 
keyboard, tests it, and causes a conver- 
sion to be made if the test proves true. 
True or false, control is returned to the 
line called the subroutine. Not bad for 
one line of code. It even makes sense 
when divided into little pieces. Perhaps 
the secret to programming is to “divide 
and conquer.” 

Perhaps? Nay, it’s a certainty. If you 
think of the programs as functional 
little pieces, you will do a lot better. 
PASCAL was also written for use in 
teaching programmers to structure their 
programs. In fact, you cannot write in 
PASCAL without adhering to strict struc- 
tural rules. In BASIC you have a choice 
of writting free-spirited spaghetti-like 
programs or relatively structured ones. 
Reading a “spaghetti” program is like 
trying to read an upside-down road map 
in the light of a new moon at midnight. 
New programmers seldom know where 
they are going with a program and 
halfway through may get bogged down 
figuring where they’ve already been as 
well. Such is part of the learning pro- 
cess, so don’t lose heart. 

Program structure means program 
organization. Most languages require 
that variables, files, data structures and 
other attributes be declared at the 
beginning. Generous use of remarks is 


encouraged and specific indentation 
formats are strongly suggested. Struc- 
turing also deals with what should be in 
subroutines, what should be in the main 
procedure and how the procedures flow. 
Much of this is optional in BASIC; some 
is just good practice in any language. 

Clarity should be as important a goal 
in BASIC as it is in other languages. 
There are a number of ways to write 
clear programs. I use the following 
procedures and find them valuable. 

1) Define specific program functions 
and put the code for each function in its 
own module with introductory REMs. 
Assign a specific set of lines to a module. 
Blocks of 100 lines are convenient and 
will meet most needs. You will always 
know a module begins at an even 
hundred and can go right to the one you 
want. 

2) Minimize looping back. The proce- 
dure should flow from start to end and 
loop only to repeat the routine or a 
portion of it. 

3) Us& EF... THEN oon ELSE to 
minimize jumping forward. Many times 
all the code for the choices can be 
contained after THEN and ELSE on one 
line so the procedure can continue on 
the next line. The INKEY$ example 
clearly demonstrates this. Some BASICS 
don't have ELSE. Apple doesn't and 
Apple owners pay extra for its lack. To 
illustrate, which is clearer to you? 





10 IF X=@ THEN PRINT “FALSE” :X 
=1 ELSE PRINT “TRUE” 
90 END | ; 


or 


"10 IF XEO THEN 30 

|'20 PRINT "TRUE: ^ GOTO40 
30 PRINT “FALSE” :X=1 
40 END 


4) Put all subroutines in one of two 
places. Frequently called subroutines, 
which include those that affect program 
speed, should be at the front of the 
program. I reserve lines | to 99 for these. 
These should not be more than three or 
four lines long. Line-number spacing of 
two is good. Putting these here serves 
two functions. First, the computer finds 
them quickly when speed counts. You 
also save bytes since the number in the 
GOSUB is only one or two bytes long. 





Infrequently called routines, particu- 
larly program initialization code, 
should be at the end of the program. 
Each time a subroutine is called or the 
computer is sent to a specific line, it 
starts at the beginning of the program 

















and searches until it finds that line. The 
fewer lines it passes to find the needed 
line, the faster the search will be. It 
follows that speed is compromised if the 
computer is continually searching over 
code it has used and will not use again. 
Clarity comes from having only two 
places to look for subroutines. 

The one exception I make is to place 
a major subroutine at the end of the 
module that calls it when only that 
module uses it. 

5) The same reasoning just explained 
also applies to the ordering of main 
program modules, provided they are 
called separately. Those used most 
frequently are put in front of the occa- 
sionally used ones. Ina file program, the 
input module is used far more than the 
save-to-disk module and should come 
to the front. Modules that are used in 
order should be placed in order in the 
program. 

6) Menus should be placed where 
they are used in the program. A menu’s 
text provides valuable information on 
the branching of the program that 
follows. If menu choices are numbered 
from one up in sequence, the the ON I 
GOTO xxx,yyy,zzz or ON I GOSUB 
xxx,yyy,zzz commands can be used. It 
is easy to read a listing, see which 
number corresponds to the code block 
you want, drop down to the ON I... 
statement and count across to find the 
target line number. 











Though I have discussed program 
structuring for purposes of easy 
trouble-shooting and modification, the 
structure proposed has program speed 
firmly in mind as well. Memory use is 
another consideration. Clarity, memory 
and speed are like three corners of a 
triangle — you cannot be at all three 
points at once. However, choices can be 
made that shorten the sides of the 
triangle to get you closer to where you 
want to be. It takes careful thought and 
planning at the start so you don't end 
up redoing too much. 

The advent of cheap memory has 
distorted the triangle in recent years. 
There is no longer such a premium 
placed on memory conservation. Un- 
fortunately, the relaxation of this disci- 
pline has led to sloppy programming 
and large programs that are slow and 
sometimes buggy. Small is still good. 

Don't be upset when you don't get 
what you want the first or second time. 
Remember, all good commercial pro- 
grams have version numbers and Ver- 
sion 1.0 is the first one offered for sale, 
not the first one of the development 
process. [PCM] 
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I Feature 100 


Sneak this program into your friends’ 
Model 100s and see their reaction when 
their computer apparently loses its 


memory 





April Fool! 


By Art Chatham 





imp is defined as a “mis- 
A | £ ha child or a young 

demon.” This BASIC pro- 
gram is an imp. It is small (occupying 
only 336 bytes when the unnecessary 
spaces are removed) but it can render a 
near heart-stopping fear. When loaded 
in a portable computer, April invisibly 
waits for the proper time to strike, then 
all RAM appears to be erased! A few 
seconds after the victim desperately 
presses any key, he is reminded of the 
date and all is restored. 

You will need no more than five 
minutes to place and trigger this April 
Fool’s prank. Load and store APRIL . BA 
from a cassette, then load and run Bury. 
Kill BURY.BA, remove the cassette and 
wait for the reaction on the first day of 
April. 

April becomes the IPL, the program 
that is invoked on a warm startup. It 
immediately calls the menu routine, 
until the date becomes April 1. Then, 
the pseudo menu is displayed, which 
indicates all user files and programs are 
gone! This display remains constant 


Art Chatham is an electronics engineer 
for the Naval Ship Weapons Systems 
Engineering Station in Port Hueneme, 
California. His hobbies include camp- 
ing, leather carving and woodworking. 
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(except for the normal clock) until some 
seconds after a key is pressed. The 
screen is then blacked out for another 
time delay before printing APRIL FOOL. 
Finally, the real menu is called and the 
victim starts breathing again. 

The April program is basically a 
series of appropriate PRINT® statements 
with a few commands that might not be 
readily understood. In Line 2, POKE 
63056,128 disables the BREAK com- 
mand (later in Line 8, POKE 63056, 0 re- 
enables). CALL 16959 locks the screen 
from scrolling when printing to the 
bottom line. CALL 17001 causes the 
following print characters to be reverse 
printed (white on black) and CALL 
17006 returns to normal print. In Line 
5, 29638 Bytes free is correct for a 
32K portable computer. For a 24K, 
change to 21446 Bytes free; a 16K, 
13254 and 8K, 5062. CALL 23920 
causes the expected clock-calendar to 
print and update until a key is pressed. 

If your intended victim already uses 
an IPL program, change Line | from 
THEN MENU to THEN RUN ^ipl.BR^, 
where ipl is the existing IPL program 
name. If you're not sure, the computer 
stores the IPL program name at ad- 
dresses 64175 to 64183, — PEEK at 
them. 

BURY gets a little more interesting. 
Lines 1 to 3 search the user part of the 


directory for April. If April isn't found 
(load and save it first), you're alerted 
that all is not well. When April is 
located, Line 5 sets Bit 3 in the directory 
flag to make the filename invisible to 
menu. Line 6 establishes April as the 
IPL program and announces that 
Bury’s skullduggery is completed. O 
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BAR CODED LISTING 

['rrrrmog mc mmn ΠΝΠΠΕΠΙΗΠΗΙΙΗΠΗΙΠΠΙΗ/ 

Listing 1: 

1 IFDATES«»"94/91/85"THENMENU 

2 POKE63056,128:CLS:BEEP:CALL16959:PRINT 

@27,"(C) Microsoft" 


3 CALL179G1:PRINT@4G," BASIC 


































"SCALLl7 


996: PRINT@51, "TEXT | TELCOM  ADDRSS 
SCHEDL" i 

4 .FORXe91TO271STEP19 : PRINTQX, "=.=": NEXT 

5 PRINTG0289,"Select:  ":PRINTQ392,"29638 

Bytes free" 


6 CALL23929 : GOSUB9 

7 LINE(9,2)-(239,63) ,1,; BF: GOSUB9 

8 PRINTQ135," APRIL FOOL ":BEEP:GOSUB9:P 
OKE63956, 9: MENU 

9 FORX-1T0299 : X—X^ 3/X^2;: NEXT: RETURN 


[ΠΠΠΗΠΠΠΠῃ [| | IIT Hill Il | [ 
[LPCM WE nd 
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Listing 2: 

1 FOR X-6393010641398TEP11 

2 A=". FOR. Y23T07 : AS-AS*CHRS (PEEK (XY) ) 
:NEXT 

3 IF A$S=S"APRILUTHEN W-X:GOTOS5 

4, NEXT: PRINT) "ERROR-Cannot Find APRIL in 
Directory"; END 

5; N&-PEEK(W) ORB : POKEW,N& 

6. XPL"APRIL.BA": PRINT"FINISHED:-"-PRINT" 

now KILL BURY: ΒΑ" PCM] 








LeScript — A Hard-to-Beat 


Word Processor 


1000/1200/3000 


Software 





Word processing is one of the most 
important applications for microcom- 
puters, and because of the dozens of 
good programs available, choosing one 
can be a bewildering business. Too 
often, the decision comes down to 
making a choice between two equally- 
attractive programs, each with specific 
functions you'd like to have, but neither 
having all the characteristics you need. 
Before you make a final choice, con- 
sider LeScript. 

LeScript is a full-function word pro- 
cessing system that operates on the 
Tandy 1000, 1200, 2000 and 3000, as 
well as the IBM PC and IBM XT. It 
requires a minimum of 128K internal 
memory, at least one disk drive and 
MS-DOS 2.0 or higher. In order to get 
a good understanding of the program, 
let's look at some of its functions and 
features. 


The Screen Display 

LeScript's screen display is different 
from many word processors. When the 
program is loaded, an initial screen is 
displayed that allows you to choose one 
of four different types of monitors: high 
resolution monochrome, low resolution 
monochrome, color RGB, or Tandy 
2000 color or monochrome. Once an 
option is selected, the program displays 
the editing or main text screen. 

Four status lines are displayed at the 
top of this screen. The first is the name 
field. Here is where the name of the 
document is entered or displayed if an 


old document is loaded from a disk. 

On the second line are several fields 
that display pertinent information 
about the document. The width field 
shows the character width of the screen. 
Eighty is the default, but the width can 
be easily changed. Next is the words 
field, which displays the total number of 
words in the document, and is dynam- 
ically updated as text is being typed in. 
The line field follows. Here, the number 
of lines in the document is dynamically 
maintained. The last is the free memory 
field. The remaining free internal mem- 
ory allowed for the current document is 
shown in this field, and is automatically 
updated. For example, if you have a 
256K machine, the initial free memory 
space is 169,984 characters. This value 
is decremented as text is entered. 

The third status line contains the 
search and replace fields. These are two 
separate areas with which you can either 
search for a string of characters within 
the document or search for one string 
and replace it with another. Both fields 
allow strings up to 28 characters in 
length. 

The fourth and last status line is the 
column grid. Much like a typewriter, 
this grid marks off the number of 
columns across the screen. Every tenth 
column position is numbered: 10, 20, 
30, 40, etc. A triangular marker moves 
across the grid simultaneously with the 
advancing cursor within the text itself, 
thus showing you the exact position of 
the text cursor at all times. 

The four status lines are always 
displayed at the top of the screen, and 
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are unaffected by scrolling or move- 
ment within a document during editing. 

All word processors utilize word- 
wrapping and so does LeScript. But, in 
addition, the program uses reverse 
word-wrap. In the reverse process, the 
program determines, after each space is 
entered, if the words from the beginning 
of the current line to the space can fit 
on the previous line, and if so, it will 
move them to the previous line and 
rejustify the text. This process is auto- 
matic and is an interesting extension to 
the common word-wrap function. 

The program also formats the screen 
text in four different ways: left, right, 
both and centered. Left margin justifi- 
cation is the most common format, 
while right, though not often used, is 
also available. When both the left and 
right margins are justified, spaces are 
automatically added between words so 
the text is flush to both the left and right 
margins. The centering function adds 
the appropriate number of spaces to the 
left and right margins so the text lies in 
the middle of the screen. These func- 
tions are evoked with the embedded 
control codes: JL, JR, JB and JC. 

Because the text screen uses only four 


lines, the remaining screen space of 21 
lines is a large and convenient window 
for entering or reading your written 
material. 


The Editing Functions 

Many of the 74 available editing 
commands perform the typical opera- 
tions expected of any good word pro- 
cessor: insertion, deletion, block moves, 
copying text, disk file operations, cur- 
sor movement and similar commands. 
But more interesting are the special 
commands of LeScript. 

Having more than just a handful of 
documents filed on a disk can be some- 
what difficult to manage, especially if 
you must remember the name of each 
file every time you wish to load it. For 
some word processors, it’s necessary to 
exit the program in order to view the 
directory. Not so for LeScript. You can 
view the files of any directory while still 
in the editing mode. While the directory 
is displayed, you may load or erase any 
file, and then return to the document 
you were working on. The directory 
command is executed by pressing CTRL- 
D. Pressing the CTRL-Z will terminate 
any operation in progress. 


In fact, the majority of the program’s 
commands are two-key combinations, 
with the control key usually being the 
first. For example, CTRL-I is the com- 
mand for inserting text and actually 
functions as a toggle switch, alternating 
between turning the insertion function 
on and then off. Deletion works in a 
similar fashion. The simplicity of the 
commands is a real advantage—you 
don’t have to wade through multiple 
menu levels to perform an operation, as 
with some word processors. 

Another powerful, yet easy, feature 
of the program is its capability to 
intermix text formats. For example, 
you can left-justify a paragraph, right- 
justify the next, center the third and 
have the last justified to both margins, 
all on the same page if you wish. Col- 
umn widths can easily be varied and 
intermixed as well. The codes for these 
formats, as well as other functions, are 
embedded in control lines which must 
appear before the text they affect. 
Headers, footers and pagination are 
also easy to add, change or delete from 
any document. 

Like many word processors, LeScript 
can super- and subscript, but in a rather 





Interface your computer to the outside world 
Learn how with the buffered 
BG-Board Interface System 


TOLL FREE ORDER LINE 
(800) 245-6228 


104 PCM 


It brings the necessary buses out to a breadboard on 
which you can construct circuits needed to acquire 
and send signals to monitor and control other devices. 
Accompanying texts and hands-on experiments guide 
you in learning and applying the fundamentals of 
interfacing. Excellent for schools and individuals. 
The BG-Board can be used interchangeably with many 
popular computers: Tandy 1000, 2000, TRS-80 I, 
III, 4; Apple Π/-/6; Commodore 64; VIC-20; and 
most MS-DOS machines requiring only the proper 
inexpensive Interface Card and cable. Prices start at 
$295 for the system. 


Write or call for our catalog of books, interface 


boards for other computers, and scientific software. 
703-651-3153 
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Trademarks: Tandy 1000, Tandy 2000, TRS-80; 
Tandy Corp. Apple II/ + /e; Apple Computer, Inc. 
Commodore 64, VIC-20; Commodore Business 
Machines, Inc. MS-DOS; Microsoft, Inc. 
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unique manner. When a character is to 
be superscribed, CTRL-1 is pressed while 
the cursor is directly over the desired 
character. The superscript character 
then alternately blinks between itself 
and an up arrow to show it is a super- 
script. The same operation is performed 
for subscripts, except that CTRL-Z is 
used. The continuous blinking is a 
fascinating technique. 

A similar display technique is used 
for italics. When the CTRL-5 is pressed 
for italicized characters, the characters 
blink between themselves and slash 
symbols (7). When bold characters are 
indicated, using CTRL-3, the characters 
are displayed in high intensity on mo- 
nochrome monitors and in a contrast- 
ing color on RGB monitors. 

For word processing, screen displays 
in color are often needless features, 
because most printers print in black. 
LeScript, however, uses color as a 
means of displaying special printing 
functions as described above, not just 
for cosmetic purposes. This is one way 
in which the program transcends most 
of its competitors. 

Another useful feature is the help 
command — CTRL-?. When called, the 
text screen is replaced with the help 
screen — a list describing the editing 
functions and their codes. So, if you are 
in the middle of a document and want 
to perform an operation and have 
forgotten the command, the help screen 
is always a few seconds away; it's not 
necessary to look up the operation in 
the manual or on the quick reference 
card. 

A variety of extended character sets 
is available with the program. Using the 
ALT key, in combination with other 
keys, you can generate European, math- 
ematical and other special characters. 
These characters will be displayed 
directly on the monitor, but your print- 
er, of course, must be able to print them. 

The most powerful function of the 
program is its ability to work with other 
types of files. LeScript can edit BASIC 
files as well as VisiCalc data files saved 
in ASCII format. Almost every Le- 
Script function for normal document 
files is available for use with these 
special files. If you're a programmer, 
this capability is indispensable. 

For those of you curious about spell- 
ing checkers, the program has the 
capability of being integrated directly 
with Electric Webster. By simultane- 
ously pressing the SHIFT, CONTROL and 
up-arrow keys, the program will auto- 
matically invoke the spelling checker 


and begin checking the document cur- 
rently in memory. Naturally, you must 
have the Electric Webster program on 
the disk to use this feature. 

To round out the editing functions, a 
few of the many other special features 
are automatic and semiautomatic hy- 
phenation, an alternate text screen for 
editing two different text files at the 
same time, previewing a document in 
near final form before printing without 
control characters being displayed and 
the availability of a printing queue for 
up to twenty different files. 


Printer Commands 

Since word processing is nearly 
worthless without a printer, it is impor- 
tant for any word processing program 
to accommodate a variety of printers. In 
this arena, LeScript is difficult to beat, 
for it has 71 different printer drivers. 
Each driver is invoked by simply insert- 
ing its code in a control line of the 
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document. The code is a K followed by 
the number of that particular driver. 
The manual lists the various printers 
and their driver numbers. The list of 
supported printers is impressive and 
includes almost every popular dot 
matrix and daisy wheel printer cur- 
rently on the market. 

The program assumes, by default, 
that a printer is connected to the parallel 
port of the computer, but if you have 
a serial printer, the program can be 
easily reconfigured to output the docu- 
ment to the serial port and also allows 
you to select nine different Baud rates, 
from 110 to 9,600 for MS-DOS compu- 
ters. 

In addition to the usual printer con- 
trol functions such as line spacing, 
indentation, individual sheet pausing, 
emphasized print, text and sheet length, 
there are special functions that make 
LeScript a highly versatile word proces- 
sor. Character pitch options (ranging 
from 5.0 to 17 characters-per-inch), 
character density options for propor- 
tional spacing and codes for printing 


selected portions of a document are all 
additional options. But perhaps the 
most useful feature is the printing of 
form letters. 

Form letters are usually any text of 
which several copies must be printed 
and where a few phrases or words must 
be changed for each copy. Normally, 
form letters will have the same general 
text, but the addresses will be different. 
A typical application would be the 
sending of announcements or advertise- 
ments using a mailing list. For LeScript, 
the form letters feature works in con- 
junction with two separate files. The 
first is a text file that contains the 
general text itself and the second is a 
data file from which the variable 
(changeable) words or characters will be 
taken and inserted in the general text. 
The data file must be created in a 
specified format so that the records are 
properly identified. In the text file, the 
insert positions of the data file records 
must also be properly identified and 
aligned. Although this seems compli- 
cated, it isn't. The two demonstration 
files on the LeScript program diskette, 
along with the manual instructions, 
make the process painless. Once the two 
files are created, you can use the preview 
function to correct any errors before the 
letters are printed. The speed of the 
whole operation, once it is running, is 
dazzling. 


Macros 

The last major feature of the program 
is the macro key capability. A macro is 
a list of predefined character strings that 
can be called and inserted in a document 
with a single keystroke. Say, for exam- 
ple, you have a series of phrases or 
names which you frequently use in your 
documents. Instead of typing them in 
each time they are needed, you can store 
those phrases or names in a macro and 
assign them to a specific key. Then when 
you want to insert that information, 
press the key and the characters will 
automatically appear, exactly as you 
had defined them. Obviously, this is an 
efficient technique for use in a variety 
of documents. 

With the Tandy-style keyboard, hav- 
ing 12 function keys (ΕΙ through F12), 
the program will allow you to define up 
to 60 different macro keys, with no 
upper limit as to the character length 
stored in each macro. The total of 60 is 
obtained by combining the function 
keys with SHIFT and ALT. With the 
IBM-style keyboard, having 10 func- 
tion keys (ΕΙ through F10), the program 
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Give your Model 100 


28K 








and access data from any other bank. 


PCSG says: Satisfaction guaranteed or your money back 


As amazing as it seems you can up- 
grade your Model 100 to 128K of RAM 
in just 60 seconds. 

It comes to you right out of the box 
looking just like the picture. You just open 
the little compartment on the back of your 
Model 100 with a quarter and it just pushes 
right into place. You can then put the cover 
back in its place. 

You then have 4 banks of RAM of 
32K each. The additional three banks 
also work just like your Main Menu. 

You push a function key and you are 
in the second bank. Push again and you 
are in third, again, then fourth. Press it 
once again for your original bank. 

It has its own built-in NiCad battery 
that recharges right from the Model 100 
and its guaranteed for a full year. 

What is really great is that you can 
copy a file from one bank to another with 
just a function key. 

Each bank is like having another 
Model 100, and all the built-in programs 
as well as any snap-in ROM programs ap- 
pear in all four banks and work the same 
way. Your widebar cursor moves from file 
to file and you access any file or run any 
program just by pressing ENTER. 

What lets you copy any file from one 
bank to another is a snap-in ROM from 
PCSG called RAM+, that comes at no 
extra charge. It just pushes right into the 
little socket in that same compartment with 
the 96K expansion unit. 


PORTABLE COMPUTER SURORT ORQUP 


within 30 days 


Not only does this firmware let you 
copy a file from bank to bank, but you can 
make a copy of any file within the same 
bank instantly with a function key. Great 
for Lucid spreadsheets! 





Copy a file from 
bank to bank with a 
function key 





You can also rename a file, or kill any 
file with just a function key. Plus you can 
do a whole lot of other useful things like 
setting the date, day and time with func- 
tion key ease. You even have a function 
key that lets you use non-Radio Shack 
printers without having to make those 
tricky dipswitch settings. 

RAM + lets you cold start any one of 
your banks without affecting the other 
three. That means that anytime you want 
you can clean out a bank’s entire memory, 
but leave intact all the files in the other 
banks. 

What is also fantastic is that you don't 
have to have the ROM in place to use the 
additional RAM. Whenever you take out 
the snap-in ROM it leaves behind a tiny 
machine code program that lets you switch 
from bank to bank just by pressing 
ENTER. 


11035 Harry Hines Blvd. No. 207, Dallas, Tx. 75229 
VISA / MASTER CARD / AM. EXP. / C.O.D. 


AM 


Software included, transfers from bank to bank. Works like mai 
menu! Includes powerful RAM Basic that lets programs store 









































Installs as easily 


as plugging 
in a socket 


This lets you use your ROM socket to 
snap-in other ROMS like LUCID spread- 
sheet, WRITE ROM text processor, or 
DISK + ROM file transfer program, and 
use them in any or all four banks. All of 
these, by the way, are available from 
PCSG. 

When you are ready to copy a file 
from one bank to another or use any of th 
other fantastic functions we talked abou 
you can just snap the RAM + ROM back 
into place. 

Everybody that has this 128K syste 
in their Model 100 is so excited, because i 
gives them four times the capacity and 
all banks work just like the Main Menu 

And what has made a lot of people 
happy is that the system bus, located in the 
same compartment, is left free for you tc 
plug in a DVI or the Holmes Engineering 
PCSG portable disk drive. 

The ability to copy a file from bank t 
bank instantly with a function key, plus al 
of the other features make this RAM ex 
tension truly an engineering masterpiece. 

Some people hesitate when they thin 
of installing something, and then other: 
are skeptical that any additional hardware 
could be as good as the Model 100 itself. 
That's why we sell these 96K expansion: 
on a 30 day trial. Simply return it within 3 
days for a full refund if you are not satis 
fied. Priced at $425. MC VISA COD. 


1-214-351-0564 









allows a total of 50 macro keys. In either 
case, the storage space is quite sufficient 
for most word processing applications. 

Another significant point is that you 
can also program LeScript editing 
functions into the macro keys. There- 
fore, you can perform one or a series of 
commands with a single keystroke. 
Furthermore, you can intermix editing 
functions and text. It's obvious that the 
programmable macro key feature is a 
powerful and captivating aspect of the 
program. 

Without question, LeScriptis a excel- 
lent word processor that performs its 
myriad of functions flawlessly. It is also 
a system which is easy to learn and use. 
The manual is succinct. The tutorial file 
provided on the program diskette is 
brief, to the point, and clearly demon- 
strates many of the editing functions. 

One would be hard-pressed to find a 
superior system. So if you are in the 
market for a word processor, you 
should consider LeScript. 


(Anitek Software Products, P.O. Box 
361136, Melbourne, FL 32936, $199.95) 


— Ralph Rideout 


Software 100 


C-Num & C-Sort: 
Filling the Holes of 
Model 100 BASIC 


When I first opened the manual to my 
newly acquired Model 100, I remember 
how impressed I was with the complete- 
ness of the portable’s BASIC. Imagine 
having access to such high-level com- 
mands as CSRLIN and INPUTS on such 
a tiny machine! I didn't even have these 
in the TRS-80 Model III BASIC with 
which I was weaned. 

Unfortunately, my admiration 
turned to annoyance the first time I 
needed to renumber a BASIC program. 
It seems that Tandy forgot one of the 
most-used and necessary utilities a 
BASIC programmer can have — renum- 
bering. I had taken for granted that 
renumbering was simply a part of the 
system as it is in most other variations 
of Microsoft BASIC. 


Queue Software Systems has come to 
the rescue with C-Num, a machine 
language renumbering utility from their 
TRS-80 Model 100 Portable Computer 
Utilities Library. 

C-Num works just like the standard 
BASIC renumbering utility, allowing you 
to start at any point in a program and 
assign new line numbers in the desired 
increments. During the renumbering 
process, all GOTO and GOSUB references 
are also changed to reflect the new line 
numbering. C-Num also performs error 
checking and informs you if there are 
references to non-existent lines in your 
program or if the new numbering 
creates line numbers less than zero or 
greater than 65,529. Other error checks 
look for increments less than one, line 
length greater than 255 bytes (in ASCII 
format) or insufficient memory to ac- 
commodate the new numbering. 

Getting C-Num up and running is a 
simple process of loading a self- 
executing loading/ relocating program 
from the C-Num cassette. This BASIC 
program automatically clears memory 
for C-Num and asks whether you want 
to load to the normal location at the top 
of memory. If not, you are prompted for 


Plot Against Your Competition! 
with QuickPlot® 





We're the people who gave the CGP- 
115 Color Plotter business status. 
With QuickPlot, your Model 100, or 
Tandy 200, produces high quality 
line-, bar- and pie-charts in vivid 
color. Simple data entry and flexible 
chart formatting makes QuickPlot 
and the CGP-115 Color Plotter the 
logical choice for the professional 
who wants to plot his profits—not 


spend them. 
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BEAST COAST 





fANIO-WEST 





STILL ONLY 


$49.00 


We pay shipping 
on pre-paid orders 


Now you have a friend in the software business. 
Computer Solutions Co. 
Ce 5 ww, Ἡ iS P.O. Box 24383 
—SJIOLUTION | Louisville, KY 40224-0383 
M — (502) 228-1440 
Call or write to place your order or send for free 
information. 


Complete QuickPlot Package 
Includes: Bar Chart, Pie Chart 
and Line Graph. Data and chart 
formats save to disk or tape for 
future plotting. 





Model 100, Tandy 200 and CGP-115 are 
registered trademarks of Tandy Corporation. 
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a new start address. If you don’t know 
a start address from a street address, 
you just answer the first prompt with a 
*Y' and the program is loaded to the 
default location. 

The loader then converts an ASCII 
file on the tape to machine language and 
saves the resulting program, C-NUM.CO, 
to RAM. After that, executing the 
program is a simple matter of placing 
the cursor over C- NUM. CO and pressing 
ENTER. A copyright notice will briefly 
fill the screen and then you are asked for 
the name of the program to be renum- 
bered. The target file has to be a BASIC 
file and the names of all BASIC files in 
RAM are displayed. You then type in 
the filename, the first line to be renum- 
bered and the increment. Renumbering 
alengthy program can take a minute or 
so, but small programs take only a 
second or two. If any errors are de- 
tected, the computer beeps and the line 
number and error are displayed on the 
screen. If there are no fatal errors, you 
are taken back to the main menu. 
Listing your program, you find that it 
has been totally renumbered. 

For those of us who have painfully 
gone through and manually renum- 
bered programs on our portables, C- 
Num is a blessing. The only addition I 
would like to see is the ability to re- 
number middle sections of a program. 
As it is, everything after the first line 
number you indicate is renumbered. 

Another function I had gotten used 
to on my trusty old Model III was the 
built-in CMD^O^ sort of TRSDOS 1.3. 
Since the Model 100 lacked one, I have 
had to use BASIC routines such as the 
one on Page 202 of the owner's manual. 
The problem is, BASIC routines require 
alot of RAM, something very precious 
to most Model 100 owners. 

C-Sort is the answer provided by 
Queue Software Systems. It is a ma- 
chine language variation of the Shell- 
Metzner algorithm familiar to most 
BASIC programmers. Rather than sort- 
ing an entire file and writing the new one 
to RAM, C-Sort sorts three-byte point- 
ers assigned to each record in the data 
file. The sorted results can be written to 
a RAM file, displayed on the screen, 
dumped to a printer or saved on tape. 
This method saves considerable mem- 
ory and allows files to be sorted which 
would be too large using a standard 
BASIC routine. 

This program is ideal for use with the 
Model 100's built-in appointment and 
address book programs and appears to 
have been designed specifically with 


them in mind. C-Sort assumes that all 
elements in a record will be on a single 
line with no carriage returns. You can 
specify where on the line you want to 
begin and end the sort, which is almost 
instantaneous. Unfortunately, it doesn't 
work too well with other data formats. 
I tried everything I could think of to use 
it with a program I had written. My 
program wrote each field in a record to 
a separate line so that the data file could 
easily be uploaded to a Tandy 1000 and 
appended to a similar program's ran- 
dom access data file of the same format. 
It just wouldn't work. I suppose it was 
a bit much to expect, but it shows that 
C-Sort is not as flexible as it could be. 

Getting this one from tape to RAM 
is a little more difficult, but still fairly 
simple. You first load C- SORT to BASIC 
from cassette and then save it to RAM. 
Then you type CLEAR 0,62537 and 
CLORDM"^SORT ^ to set the start address 
and load the machine code from 
cassette to RAM. Next you type SR 
VEM”SORT” ,62537,62908 to save 
SORT to a RAM file along with the 
starting and ending addresses. At this 


Software 1000/1200/ 3000 


The Newsroom, A 
Tool For Amateur 
Publishing 


The Newsroom is impressive. It has 
a nice combination of clip art, graphics, 
word processing and communication 
capabilities. The original package 
comes with 600 pieces of clip art and an 
additional 600-piece volume of clip art 
is also available. Graphics tools for use 
with the keyboard, a joystick or a Koala 
pad, allow modification of the clip art 
provided or the creation of new clip art. 
The word processing features allow the 
use of five type styles in coordination 
with the clip art to produce a news- 
paper-type document of your own 
design. 

The wire service (communications) 
features allow the transfer of data 
among IBM PC/PCjr, Commodore 64 
and Apple II series computers. This 
transfer capability can handle both the 


point, you can run the program by 
placing the cursor over C- SORT . BR and 
pressing ENTER. 

The installation might sound a bit 
confusing to those who are not used to 
working with machine language pro- 
grams on the Model 100, but the man- 
uals for C-Sort and C- Num hold your 
hand through it. Although the manuals 
are pretty skimpy-looking, they do 
provide clear instructions for these 
easy-to-use utilities. It would appear 
that phone support is not something 
Queue wants to offer, though. I couldn't 
find a phone number for the company 
listed in either manual or in any adver- 
tising. 

C-Num and C-Sort are well worth 
their prices and offer handy additions to 
any Model 100 library. C-Num is an 
absolute must for BASIC programmers 
and C-Sort is a useful tool for all 100 
users. 


(Queue Software Systems, 4528 Belleview, 
Suite 210, Kansas City, MO 64111; C-Sort 
$24.95, C-Num $19.95) 


— Richard Burckhardt 


graphics and text. Your newspaper can 
be started on one type of computer and 
transferred to another type of computer 
for further work. A group of people at 
different locations around town can all 
work on the same project even though 
they each use different equipment. 

The Newsroom is copy protected in 
a way that allows the files on the News- 
room disks to be backed up. The 
backup disks cannot be run themselves, 
but they can be used to restore any files 
on the original disks if necessary. The 
Newsroom comes with a master disk 
and a second disk for the clip art library. 
The additional, extra cost, Volume 1 of 
clip art takes one disk. The documen- 
tation and online prompts step you 
easily right through the procedure to get 
set up for your equipment configura- 
tion. Procedures are provided for both 
one-drive and two-drive systems. The 
IBM setup procedure contains special 
options specifically for the Tandy 1000 
and 1200. The Newsroom requires 128K 
and DOS 2.0 or higher for the IBM 
compatible machines. 

A large variety of options for popular 
computer printers are included with 
The Newsroom. The printed outputs 
are designed around either 84 by 11- 
inch letter-size paper or 8'4 by 14-inch 
legal-size paper. The output page may 
be divided into panels and banners. The 
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banner is the full width heading on the 
first page of a document. It amounts to 
the top quarter of the page for letter size 
and the top fifth of the page for legal 
size. The rest of the first page has two 
columns of panels, three panels in each 
column for letter size and four panels in 
each column for legal size. The banner 
doesn’t need to be the first page, it 
doesn’t even need to be used. I refer to 
it being part of the first page because 
that is the most common way for it to 
be used. Continuation pages normally 
have two panels, one in each column, in 
place of the banner. 

Letter-size pages can have either a 
banner with two columns of three 
panels each or no banner with two 
columns of four panels each. Similarly, 
legal-size pages can have either one 
banner with two columns of four panels 
or no banner with two columns of five 
panels. The banners and panels are only 
used to break the pages down into 
workable pieces. The end product is 
combined as though it were all one piece 
with no visible separation of banners 
and panels. The panels and banners are 
just an imaginary breakdown for work- 
ing on your paper one piece at a time. 


A sentence can start on one panel and 
finish on the next. 

Actually, a full page doesn’t even 
need to be produced. A panel by itself, 
a banner by itself or even a partial page 
of data can be printed without any 
problem. Even the clip art (photos) can 
be printed without being placed into a 
panel or banner. 

Now that the normal layout of a page 
and the setup procedure have been 
explained, let’s get on to using The 
Newsroom, When first fired up, a gra- 
phics display of the six main menu items 
is shown. The six choices are Photo 
Lab, Press, Wire Service, Banner, Copy 
Desk and Layout. Each of these will be 
covered separately. The menu choice 
can be selected by use of the arrow keys 
on the keyboard, a pencil movement on 
a Koala pad or the movement of a 
joystick. As the cursor moves around 
the main menu, the cursor location is 
indicated by highlighting with bright 
video. When the proper choice is high- 
lighted, the selection key on the joystick 
or Koala pad is depressed to make the 
selection. For using the keyboard, the 
ALT key is depressed. This same selec- 
tion procedure applies to all menus and 


the graphics tools of The Newsroom. 
For this article, the selection key refers 
to the Koala pad or joystick selection 
key unless you are using a keyboard. If 
you are using a keyboard, the selection 
key refers to the ALT key. 

The use of a keyboard moves the 
cursor around the screen in small 
jumps. This is not ideal for working on 
fine graphics detail so an option was 
included in The Newsroom for moving 
in very small increments. By simply 
depressing the shift key while using the 
arrow keys, the keyboard movements 
are reduced to the very small moves 
needed for detail work. 

Now for the first main menu choice. 
The Photo Lab on the main menu has 
an illustration of a photographic dark- 
room. The Photo Lab has its own menu 
of choices with icons down the left side 
of the screen. A work area takes up the 
remaining screen area. The icons which 
can be chosen are these: a picture to 
allow the selection of clip art from a 
library disk, a left and right arrow to 
allow reversing (or flipping) the clip art 
in the work area as in a mirror image, 
a crayon to allow calling in the graphics 
tools window, a magnifying glass to 
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WHY FIGHT IT?. . .SWITCH! 


TABCO PARALLEL Printer Switch 
connect 2 printers to one 
computer! 
PSM-C/2P — Manual 
printer switch. Prolongs 
the life of your printer/ 
interface connectors. 
Saves time & money! Use 
your existing printer 
cable to connect TAB 
SWITCH to your compu- 
ter. Comes complete with 
two 3.5' cables to connect 
your printers. Straight- 
forward design makes it 
easy to set-up & use. 1 

year limited warranty. 
Other models available. Dealer 
inquiries invited. $2.50 Shipping/ 
Handling. Florida residents add 
5* sales tax. 


See your dealer 
or 
Call 1-800-874-1551 Just flick your switch 


ORDER TODAY 
Only $69.95 


Cables built-in 


(optional lengths available) 


Nothing else to buy 
Fingertip control 


MEET THE WIZARD™ 


Quality / Price / Performance Guaranteed 
Easy to use! $29.95 for any one package 


9.95 tor each additional 


For TANDY 1000, 1200, 2000, 3000 and Compatibles 


1. RAMDISK — Transform your spare memory into 
superfast disk(s). You specify size and number. 


* NEW * 
and 
BETTER 


replace your old ramdisk software. 
Ours has automatic timed backup. 
Never again lose your ramdisk data. 


. UNDELETE Plus — Recover deleted files, graphics 
display of directory tree, rename directory, find 


all). 


etc. 
. XTEND — 


. SNAPSHOT — 
text screens. Great for debugging, Help screens, 


files in any directory, display sorted check files, 
change file attributes, and more (10 programs in 


Instantly save and display up to 99 


Instantly recall, edit and execute your 


last 30 DOS commands. Execute multiple com- 


mands with one keystroke. (Macro facilities). 
Makes DOS easier! 

. GRAFIX — Send graphics screen image to printer. 
You set printout size/density. (for most printers) 

. FONTIX — Set printer fonts, tabs, margins, etc. 


TAB SALES CO. 


704 W. Michigan Ave. 
Pensacola, FL 32505 


Automatically produce paginated printouts and 
structured Basic listings. (for most 


800-622-4070 
WIZARD Utilities 800-942-7317 in ILL. 


Sudbury, MA 01776 $3.00 ship & handling 


in Mass add 5% tax 


P.O. Box 8098 Ph: 904-438-6507 
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blow up part of the work area for detail 
work, the word “oops” to undo what 
was just done, a trash can to clear the 
work area, a camera to take a snapshot 
of the work area or a portion of the 
work area for saving to disk, a disk to 
allow saving a photo (from the snap- 
shot) to your data disk or loading an 
existing photo from your data disk, and 
the word “menu” for going back to the 
main menu. 

To build a graphics image from a clip 
art library, the picture icon is selected 
to call up the clip art library. For a two- 
drive system, the master disk is in Drive 
A and the clip art disk goes in Drive B. 
As is the case throughout The News- 
room; if the proper disk isn’t there 
already, the disk is asked for with a 
polite message. When the disk is avail- 
able, an index of the clip art is displayed 
which allows the selection of a partic- 
ular set of clip art by name. The same 
clip art set names are listed in the 
documentation with illustrations. The 
selected clip art set is displayed on the 
screen when selected. A hand appears 
on the screen in place of the cursor. 
Move the hand onto the particular piece 
of clip art you want and use the selection 
key to select it. Once selected, your 
photo work area appears on the screen 
again with the clip art included. Use the 
hand to move the clip art around within 
the work area with the arrow keys, the 
joystick or Koala pad pencil. When 
using a keyboard, remember to hold the 
shift key down to move the clip art in 
small increments for final detail work. 
When properly located, the clip art is 
dropped by depressing the selection key 
again. 

At this point, you can call up the 
graphics tools, flip the image, magnify 
the image for detail work, clear the 
work area to start again or define an 
area of the work to be saved with a 
snapshot. After saving the clip art to 
disk, the finished photo can be used 
again. You might want to add text to the 
photo itself or clip the photo by use of 
the camera or even add your own touch 
to the art by use of the graphics tools. 
Normally the photo would be loaded 
from your data disk to become part of 
a panel for inclusion on a finished page 
of output. However, the photo can be 
printed by itself, transmitted via the 
wire service or just saved for possible 
future use. 

The Banner selection from the main 
menu offers the same options as build- 
ing a photo except that there is no 
camera icon for snapshots. The main 


menu shows a person working at a 
drawing table with “Banner” for a 
heading. The banner is double the width 
of a full photo or panel in that it covers 
both columns of a page across the top. 
Graphics for a banner are formed by the 
same methods as in a photo except that 
it isn’t necessary to take a snapshot. 
Previous banners can be loaded from a 
data disk for modifying, transmitting, 
or printing. New banners can be created 
using text, clip art, your own art with 
the graphics tool box or any combina- 
tion of these. 

The graphics tools include choices for 
line, lines, circle, box, draw, erase, 10 
pen sizes/styles, 10 fill patterns, the 
hand to move images around and five 





“Anyone can have fun 
with it. If you want 
something to really 
catch the interest of 
your children in 
creative writing, get 
The Newsroom.” 





text types. The text choices are small 
serif, small sans serif, large serif, large 
sans serif and large English. The gra- 
phics tools are about equivalent to some 
other software packages which offer 
graphics tools alone without any of the 
other features of The Newsroom. It may 
be that a stand-alone graphics package 
would typically offer a few more graph- 
ics features (such as color choices), but 
The Newsroom is quite complete in 
itself. 

The Copy Desk from the main menu 
is for building or modifying a panel. 
This choice is indicated by an illustra- 
tion of a news person at a desk with a 
typewriter. The Copy Desk has icons for 
font, erase, oops, trash can, disk and 
menu. The same font choices apply here 
as mentioned earlier about the graphics 
tool box. The Copy Desk menu choices 
are similar to those for banner or photo 
work. There are special features within 
the Copy Desk however. The erase 
option clears all text from the work 
area, but retains any photos. The trash 
can option clears the entire work area. 
Photos as defined in the Photo Lab can 
be loaded from your data disk for 
inclusion in the panel. This is normally 


the first step because the entry of text 
will automatically flow around any 
photos only if the photos are there first. 

The Copy Desk is the area which has 
the most word processing features. Note 
that only one small and one large font 
can be used in any one work area. The 
moment you switch from one type of 
small font to another, all of the small 
font in the work area makes the same 
change and similarly for large fonts. 
Basic word processing features are 
included. Insertion within existing text 
is automatic at the cursor location. The 
delete key is used to delete small 
amounts of text. Text can be deleted or 
moved in blocks by first marking the 
boundaries of the block with the selec- 
tor key. CTRL-Q and CTRL-W are used for 
moving and copying text. It is really 
neat the way the text will automatically 
wrap around any photos in the work 
area and the way the text fits together 
from one panel to the next on the final 
printed output. 

When a panel is finished, you nor- 
mally save it to your data disk by 
selecting the disk icon. Another panel 
can easily be started by using the trash 
can option to clear the work area before 
starting another panel. When all panels 
are completed, the next logical step is 
the Layout choice of the main menu for 
assembly of pages. The main menu 
illustration for Layout shows a cut and 
paste operation. Of course using The 
Newsroom is much easier than any cut 
and paste operation with real glue. Who 
needs sticky fingers! 

The first choice for Layout is re- 
sponding to a prompt about laying out 
a page with a banner, laying out a page 
without a banner, loading a previously 
saved page from your data disk, or 
returning to the main menu. Layout is 
quite easy. After you select one of the 
page layouts, you just move the cursor 
to the banner or panel you want to work 
on and depress the selection key. If you 
were in the banner area when you 
depressed the selection key, the banner 
names will be displayed as you defined 
them when they were saved. You just 
move the cursor to the banner name you 
want and depress the selection key. 

The next display will show a layout 
of the page with the name of the selected 
banner in the banner area. Then you 
just move the cursor to the panels one 
at a time and select the previously-saved 
panel names for inclusion in the page. 
If you change your mind, you just select 
a new banner or panel name for inclu- 
sion on the page. When you finish the 
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page, the save option is selected to save 
the entire page to your data disk with 
whatever name you choose. Build as 
many pages as you wish. 

To see what the actual printed page 
looks like, just go back to the main 
menu and select the Press option with 
the illustration of a printing press. In the 
Press you have the choice of changing 
the printer setup to match your equip- 
ment, printing or going back to the 
main menu. A page, panel, banner or 
photo may be printed. Normally the 
finished product will involve printing a 
page which may include a banner and 
which will include one or more panels. 
You just select the print page option and 
then select the page name which you 
want to print. Here again, as through- 
out all menu choices, The Newsroom 
will prompt you for the proper data disk 
if it isn’t found in the drive already. You 
are also reminded to have your printer 
ready before the printing starts. 

The printing is similar to a graphics 
screen dump. To me this is the only 
significant problem with The News- 
room. The print quality isn’t really up 
to the standards of most people that are 
publishing a professional looking news- 


letter, newspaper or similar type of 
document. The print quality is certainly 
readable, especially so if you have a 
good ribbon in the printer. On the other 
hand, there is no choice about double- 
strike or near-letter-quality printing. In 
fact, there just isn’t any choice about the 
print quality. I imagine the print quality 
is fine for some small informal newslet- 
ters and for classroom work on how to 
put a newspaper or newsletter together. 
Children should also love it for creating 
customized stationery by use of the 
banner option or for creating nice 
graphics printouts. 

Perhaps I am being overly critical 
here. I have seen some articles in com- 
puter journals about professional pub- 
lishing recently. That normally involves 
a laser printer, a loaded microcomputer 
and software costing many thousands 
of dollars. The list price for The News- 
room with the basic system including 
600 pieces of clip art and with one 
additional volume of 600 more pieces of 
clip art lists for about $90. Unfortu- 
nately, I don't have a laser printer at my 
disposal for trying The Newsroom with 
that type of printer. A laser printer 
might not even be one of the printer 


choices that comes with the system. The 
Newsroom just isn't aimed at that 
market, it's more for home and school 
use and meets that need very well. 

Another problem with 7he News- 
room is that the wire service doesn't 
allow changes to the communication 
parameters. I couldn't use the wire 
service because my modem doesn't send 
the standard CONNECT string, etc. I don't 
consider this a significant problem for 
most people because most people 
wouldn't get The Newsroom for its 
communication features anyway. How- 
ever, this could potentially be a signif- 
icant shortcoming in some special situa- 
tions. 

The documentation manual for using 
The Newsroom covers all of the features 
in only 44 pages. That is approximately 
half of the manual; the other half is 
devoted to a guide about how to create 
a newspaper. I am truly amazed that 
only 44 pages are needed to cover all of 
the features for multiple types of com- 
puters using the keyboard, a joystick or 
a Koala pad. The menu choices and the 
prompts are so well laid out that this 
small manual won't even be used very 
much. Everything is done in a very 
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Two Aviation Programs in one package! 
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IF YOU CHARGE FOR PARTS, MATERIALS, OR SUPPLIES 
THEN LAWYERS, ACCOUNTANTS, CONSULTANTS, 
TRADESPEOPLE, REPAIRMEN 
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THIS ONE IS FOR YOU! 


FEATURES OF THE BUSS.BA PROGRAM: 


THE TIME CLOCKS — Includes two time clocks. Each clock 
will keep the elapsed time on a job; calculate the charge for the 
elapsed time (rates are user setable); and update the proper job 
file with the date, the elapsed time, the charge and an optional 
comment. 


ITEM CHARGES — You can enter a charge to any customer 
account for any service, item or quantity of items. The entries 
may be tagged as taxable or non-taxable, and may include a 
markup or mark-down. The program can automatically 
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Time! 

* Modify Flight Data as 
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logical way that anyone can follow. The 
only pitfall here may be forgetting to 
save your work before moving on to the 
next step. My 9-year-old daughter was 
using The Newsroom without any trou- 
ble except that she forgot to save some 
of her work. Perhaps a future release of 
The Newsroom will have more remind- 
ers about saving your work before 
moving on to the next step. 

The documentation covers every- 
thing and is well-written. It’s a compli- 
ment to say that everything is well 
covered in only 44 pages. The documen- 
tation recommends separate data disks 
for photos, panels, banners and page 
layouts. You can use one disk for all of 
these if you wish, but you may run out 
of room on the disk once you get started 
trying all the handy features and op- 
tions of The Newsroom. The documen- 
tation is packed full of samples for 
building newspaper banners with clip 
art and for using clip art within the text. 
It is a well known fact that clip art adds 
a great deal of comprehension to any 
written document. 

The Newsroom is truly a fine product 
and well worth the cost. Anyone can 
have fun with it. If you want something 


to really catch the interest of your 
children in creative writing, get The 
Newsroom. If you want to create your 
own newspaper or newsletter and aren’t 
too concerned about professional print 
quality, get The Newsroom. You prob- 
ably wouldn’t use a printer at home if 
you were too concerned about print 
quality anyway. The Newsroom would 


be a fine addition to your selection of 
software. 


(Springboard, 7808 Creekridge Circle, 
Minneapolis, MN 55435, $59.95 for The 
Newsroom and $29.95 for Clip Art Collec- 
tion Volume 1. Includes a 30-day money 
back guarantee.) 


— Robert Jensen 





Software 1000/1200/3000 


It’s a Miracle 


Well, perhaps it’s not a “miracle,” but 
it is certainly a prodigious help for 
“power” database users. 

This is a top-quality piece of software 
with documentation that is a work of art 
from the visual standpoint. 

Miracle is also very complex or, at 
least, it can be very complex. 

Miracle contains a very usable word- 
processor which includes such things as 


automatic date insertion and (if you 
have over 256K memory) up to four 
windows. (Miracle windows, by the 
way, aren’t portions of the larger text or 
spreadsheet, they are independent 
worksheets.) 

The windows are made easier to use 
by the optional use of different color 
background and print in each window 
(on color graphics-equipped computers 
only, of course). 

While working with up to four differ- 
ent wordprocessing files at once (either 
displayed simultaneously or with just 
one zoomed to fill the screen), you can 
cut and paste between these different 
documents. 

When using Sheet, the Miracle 
spreadsheet (256 by 64), you can also 
open up to four windows, each inde- 
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BARBAROSSA 


The War in Russia 1941-44 


ARK ROYAL'S most popular Color Computer wargame is now available on 
the Tandy 1000 and all IBM compatibles. Hi-res graphics, 100% ML, Bar- 
barossa is the same game raved about in the RAINBOW and HOT COCO (Jan 
'86), except that the 1000’s memory allows room for a host of expanded fea- 
tures. Included are bitmapped logical characters (tanks, infantry, airflottes, ci- 
ties and terrain), normal and Bliltskrieg movement, airstrikes, supply 
consideration, unit detail, group transfer, weather, intelligence, (which even 
tells you which sector your attacking unit is in), patrols, game save and even 
more. $24.95, disk. We pay shipping and handling on all prepaid orders in 
USA. COD charge is $2.50. Personal checks in US accepted with no shipping 
delays. Foreign orders send M.O. in US funds. FL residents add 5% sales tax. 


Jacksonville, FL 32238 


P. O. Box 14806 


(904) 786-8603 





pendent, with separate information. 
You can also build a three-dimensional 
spreadsheet by linking up to four sepa- 
rate sheets giving you a true 3-D spread- 
sheet. 

For example if you have one sheet 
named “first” and another named “sec- 
ond,” you can either use them as two 
completely independent spreadsheets, 
or call information from “second” into 
“first” using a formula entered into 
some cell in “first.” 

If you already have spreadsheets in 
use, Miracle provides for conversion of 
Lotus 1-2-3, VisiCalc and Multiplan 
files to Miracle’s spreadsheet along with 
a conversion program for changing 
ASCII files to Miracle’s document files 
for the Miracle wordprocessor. 

You can also set up a simple “plus/ 
minus” graph right on your spreadsheet 
or, if you have color graphics, you can 
call up a full screen view of any of a 
number of two- and three-dimensional 
graph forms defined to your current 
spreadsheet. 

You can also (if you will settle for a 
mundane four-color bar graph) have a 
graph displaying the relation of selected 
ranges of spreadsheet elements on the 
right third of your spreadsheet page. 
This graph, of course, changes as you 
change data in the spreadsheet. Let me 
make this clear; the graph actually 
shares the screen with the spreadsheet 
if you wish. 

The graph types include: area, bar 
(two- and three-dimensional and 
stacked), line, pie (two- and three- 
dimensional), X-Y and a special stock 
trend analysis chart (high/low/close/ 
volume). You can switch between var- 
ious types of graphs in a few seconds to 
permit you to select the one that most 
clearly presents your data. 

The real miracle of Miracle is the way 
all of these functions are tied together. 
Using Agenda you can program Mira- 
cle to call up a data base, log on, 
download files to a spreadsheet and 
graph the information — all automat- 
ically. 

The Comm module supports “XMO- 
DEM" and “XFER” protocols, along 
with the transfer of ASCII files. 

Miracle will also accept calls (unat- 
tended) from other computers, so be 
careful who you let it talk with. 

Comm supports up to 2,400 Baud 
modems (Hayes compatible or any 
command driven model) and up to 
9,600 Baud direct (XON/ XOFF). (I 
was not equipped to verify this beyond 
1,200 Baud but it does work with Tan- 


dy's 300/1,200 Baud modem.) 

Miracle accepts (for each file) a 
primary and alternate phone number 
and you can specify up to 99 retries 
each. After a total of 198 tries (maxi- 
mum to your specification), Miracle 
gives up. 

Miracle comes on line emulating a 
TTY terminal but will also emulate 
Digital Equipment's VT-100 and VT-52 
terminals (although not completely). 

Miracle will accept 10 macro keys, 
each with 64 characters, but you don’t 
need to use these for phone numbers 
and log on procedures. These are con- 
tained in . TRM (terminal) files. 

For each database you set up a file 
called SCRIPT. SCRIPT contains things 
such as your terminal identifier, user 
ID, password and the instructions to 
take you into the part of the database 
you wish to use. Building a SCRIPT file 
that recognizes system prompts and 
responds correctly could be quite a job 
with a text editor (although I did it in 
afew minutes for Delphi), but you don't 
need to go through that. If you use 
Miracle's learn mode, Miracle can build 
a SCRIPT file while you access the 
database in your normal fashion — 
Miracle memorizes the procedure as 
you perform it. 

Each set of instructions for different 
databases (including protocols, phone 
numbers, macrokeys and script files) is 
saved in a separate terminal file that is 
presented for your selection at the 
beginning of each session. If you choose 
one of the existing files, you are auto- 
matically logged onto that system (if 
that is what your SCRIPT file calls for). 

Compatability is always a problem 
and Miracle includes translation tables 
to help. The translation tables (one for 
each data path: display, terminal, cap- 
ture buffer, printer, etc.) are filters that 
allow you to specify the output for each 
individual ASCII character separately. 
If you want ASCII code “049” to pro- 
duce ‘A’ instead of ‘1’, just change the 
character in the appropriate table. 


Documentation 

My only real complaint about Mira- 
cle involves that beautiful documenta- 
tion. I first tried to use the program on 
a 1200HD with 256K and no modem. 
Portions of the program worked but not 
as the documentation said they should. 
In particular, I could not access the 
terminal program to prepare files for 
the arrival of my modem. In addition, 
I could not open windows in the word- 
processor and could only barely open 
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one in the spreadsheet. The people at 
Micro-Systems explained that, quite 
reasonably for a communications pro- 
gram, Miracle would not permit access 
to the terminal program without an 
installed modem (or RS-232). I was also 
told that windows wouldn’t work in 
256K. 

Every program has its system require- 
ments and there is certainly no fault 
with Miracle because it won’t work 
without required hardware. My com- 
plaint is that two lines explaining these 
exact restrictions in the documentation 
would have saved my trying to recon- 
figure my system by modifying CON 
FIG.SYS and several attempts to rein- 
stall the software — not to mention a 
call to Florida. I couldn’t find anyplace 
where the literature or documentation 
mentioned that you really need more 
than 256K to make full use of the 
program. (Speaking of customer sup- 
port, the people at Micro-Systems were 
very helpful — even before they knew 
I was writing a review.) 

Another curious lack in the docu- 
mentation was in the spreadsheet in- 
structions. Nowhere in the instructions 
does it mention how to enter a custom 
formula into a cell (you use ‘=’ before 
the formula). 

I guess I am upset with the documen- 
tation because the rest of the program 
is so terrific. Did I mention that there 
are 185 screens of information available 
at the Help command? This onscreen 
help is so large that it has both an index 
and a table of contents. In the help 
section for the spreadsheet the built-in 
functions are explained and there is 
even an on-screen demonstration using 
a (static) portion of the spreadsheet to 
illustrate proper use. 


Conclusion 

Miracle is a well-designed, easy-to- 
use and very sophisticated integrated 
communications package. With an 
enhanced computer system (expansion 
memory and graphics) it is also an 
attractive looking program with ad- 
vanced wordprocessing and spread- 
sheet features (3-D spreadsheets with 
on-spreadsheet graphics and multiple, 
independent windows on both) but, as 
Micro-Systems Software's own docu- 
mentation points out, this is primarily 
a communication program. 

As an active investor, I can see that 
using Miracle to update my spread- 
sheets and graphs automatically will 
save enough on-line expense to pay for 
the program in a reasonable time. 


One important note; the 1200 version 
of Miracle differs slightly from the IBM 
version, so be certain you get the correct 
version. Since Miracle is available 
through Radio Shack's Express Order 
system, ordering through Radio Shack 
is the easist way I know to be certain of 
getting the correct version. 

There are other programs available 
with similar features, but I know of no 
other that can offer this ease of use for 
such a reasonable price. 

Miracle does not permit direct-to- 
disk saves of captured data (the pro- 
gram saves to a volatile memory file 
which can then be saved to disk). The 
people at Micro-Systems tell me that 
MTERM II, another communications 
package available from them, will 
download directly to disk. 

I would like to say a special word of 
thanks to the people of Perry Compu- 
ters without whom I would not have 
received a modem in time to complete 
this review. 


(Micro-Systems Software Inc. 4301-18 Oak 
Circle, Boca Raton, FL 33431, $299. EOS 
# 90-0293) 


— John McCormick 
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TM PC Manages 
Your Time 


TM PC stands for “The Most Pre- 
cious Commodity” time. The program 
by that name, developed by Acroatix 
Inc., does an excellent job of helping 
you manage your time, keep track of 
your assignments and appointments. It 
even makes you rate assignments ac- 
cording to both priority (on a one-to- 
three scale) and stress (on an A-to-C 
scale). Its instruction manual is well- 
written and easy to understand. It 
contains a thorough tutorial and a 
summary of all program functions, all 
written in plain English. 

Using TM PC is simplicity itself. The 
program is divided into 14 screens 
through which you move a person- 
shaped cursor to enter and review 
assignments and appointments. On the 
way, the program offers many little 
touches — one screen even allows you 
to change the shape of the cursor if you 
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find the tiny person too cute for your 
taste. 

The screens are arranged in a logical, 
three-column tree. The left-hand col- 
umn contains three screens for assign- 
ment processing. These allow you to 
add new assignments, which the pro- 
gram calls *ToDos," and rate them for 
stress and priority; view the assignment 
list; and process individual assignments 
(either hold, cancel, or move them to the 
list of things to do today). 

The central column deals with today's 
status. From the top, the screens are: the 
date, overall status (the number of 
assignments and appointments listed as 
upcoming), daily status (the number of 
assignments and appointments on your 
plate for today), and “Process To Do” 
where you mark individual assignments 
as done. Two additional screens are 
available from the *Process To Do" 
screen. To the left is “Record Functions’ 
which allows you to change the cursor's 
shape and speed through TM PC's cor- 
ridors. To the right is a future expansion 
screen that will allow you to use expan- 
sion modules that Acroatix is develop- 
ing. 

The right-hand column allows you to 
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The Handicapper 


Use your Tandy 1000, 1200, 2000 or Model 100/200 
to improve your performance at the track! Separate pro- 
grams for Thoroughbreds, Harness horses and Grey- 
hounds rank the horses or dogs in each race. Handicap a 


set and view appointments. Its three 
screens include the calendar, which 
allows you to select a date other than 
today; “View Appointments,” which 
shows the appointments and memos 
attached to the date you have selected 
(today if you have not used the appoint- 
ment calendar); and “Add Appoint- 
ments.” This bottom screen has several 
conveniences. You can attach a warning 
to an appointment, for instance, and 
specify how many days ahead you want 
the warning to appear. These warnings 
appear on the “View Appointments” 
listing. It also allows you to set up 
weekly and monthly repeating appoint- 
ments. Therefore, if you have a deadline 
on the 15th of every month or a meeting 
every Wednesday you only have to enter 
it once and use the monthly or weekly 
repeat screens to have it automatically 
repeated. The monthly repeat screen 
even lets you program TM PC to move 
the appointment ahead or back to the 
nearest business day if it happens to fall 
on a weekend or holiday in a given 
month. 

Unfortunately TM PC lacks an an- 
nual repeating feature, so holidays, 
birthdays and anniversaries must be 


race in minutes, even if you've never handicapped a race 


before! 


All the data you need is readily available in the thor- 
oughbred Racing Form, harness or dog track program. 
We even provide diagrams showing you where to find the 
information you need! Data entry is quick and easy. Our 
manual shows you how to bet, when to bet and when to 
sit out—one of the real secrets of good handicapping. 

Thoroughbred, Harness or Greyhound Handicapper, 
$49.95 each on T1K disk. Thoroughbred and Harness 
only, $49.95 each on Model 100/200 tape. Any two for 
$74.95, all three $99.95. You can buy a more expensive 
handicapper, but you can’t buy a better one! 


manually entered. Entering appoint- 
ments is a tedious process, requiring 
you to move back and forth through 
three screens. TM PC does not display 
any unified list of the assignments and 
appointments you have to do today. 
You can, however, print the list of your 
assignments for the day using a com- 
mand in the “Process To Do” screen. 
TM PC also does not allow you to 
search for an appointment when you 
can’t remember its date. The only way 
you have of finding it is to consult the 
appointment’s calendar and check dates 
that are marked as having appoint- 
ments on them one by one. 

All of these things can be fixed with 
additional modules. TMPC unfortu- 
nately suffers from a much larger prob- 
lem that modules will only exaggerate. 
It takes up too much room. TM PC is 
a machine language program that takes 
up 9,600 bytes. The file it sets up to hold 
your data adds several hundred more. 
That is a lot of overhead in a machine 
that has a maximum of 32K memory. 
Nor will you want to take TMPC out 
of the machine when you aren’t using it 
— since it is your appointment cal- 
endar, you will want it available at all 
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times in case you need to make an entry. 
Furthermore, as an assignment tracker 
it is only effective if you can check off 
assignments and select new ones as you 
complete each job. 

Time might be your most precious 
commodity, but if you are to get full use 
out of your Model 100 the byte count 
is also vital. TMPC does not do any- 
thing that you cannot do just as easily 
manually with an appointment book. 


1000/1200/3000 


Software 





Infidel — An 
Adventure by Any 
Other Name 


First let me get something straight— 
I am not a big aficionado of Adventure 
games. I’m not all that good at solving 
them either. Now that I’ve lost all of the 
Adventure purists because they know 
that I’m “one of those,” I'll proceed. 

When I heard of the “Interactive 
Fiction” series by Infocom, I was in- 


Whether you can afford the space 
depends on what else you use your 
Model 100 for, but you should seriously 
consider the hidden cost of computer 
memory overhead before investing in 
this otherwise excellent program. 


(Acroatix Inc., Box 273, Wilmington, MA 
01887, $50 plus $3 S/H) 


— G. Berton Latamore 


trigued. I wanted to try playing an 
active roll in a novel (if you will), 
turning the plot this way and that 
depending on the decisions I made. 
That is why I wanted to try one of this 
series of programs in spite of the 
disclaimer I made in the first paragraph. 

Infidel by Infocom is a thoroughly 
creative program. A computer system 
which runs MS-DOS 2.0 and uses 54 
inch diskettes is required, with either a 
40- or 80-character display. A Tandy 
1200HD will do just fine. I spent well 
over an hour reading the literature 
which accompanies the non copy- 
protected diskette. This literature is 
designed to immerse the participant in 
the mood of the story which is about to 


unfold. Included are entries from a 
handwritten journal (written by your 
character) detailing how this great 
opportunity fell into your lap — the 
chance to head an archeological expe- 
dition to Egypt and gain the glory and 
respect you so rightly deserve — not to 
mention the untold riches you hope to 
unearth! 

The offer comes from an elderly 
woman whose father explored the area 
in the early part of the century, discov- 
ering some tantalizing clues concerning 
the location of a lost pyramid before the 
hostile desert claimed his life. You have 
his map and a stone cube with 
hieroglyphic clues. You set off with 
these and a crew of locals to find the 
spot in the middle of the desert. 

The journal proceeds to tell that all 
does not go well with your expedition. 
Equipment malfunctions, short sup- 
plies and cultural frictions bring the 
locals near the point of mutiny. You sit 
in your tent and decide to write an 
encouraging letter to your sponsor back 
in the U.S. The letter is also included 
with the program, and is quite humor- 
ous. Little do you know, but the refresh- 
ing native beverage which you sip while 


TANDY 1000 
Multifunction Board 


YOU ALREADY HAVE 
HALF OF THE BEST 
WORD PROCESSING 
up - IN THE WORLD 


MICRO MAINFRAME 4N1 


more, your MultiMate, 
Display Write, WordStar, pfs: WRITE, 
VolksWriter, Writing Assistant or other WP 
Software! can instantly [E P] 2] fourteen 
columns of text, Z automatically 
< create outlines, calendars 
newsletters contracts, 
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RS-232C Serial Port 

DMA Controller 
Clock-Calendar, Optional 
Clock-Calendar/Mouse, Optional 


THD-1000 10 Meg Hard Disk . 
TANDY-1000 


Powerlext 


CALL NOW 


(916) 635-3997 Micro Mainframe 
11285-E Sunrise Gold Circle 
BBS (916) 635-6175 Rancho Cordova, CA 95670 


1 Any other MS-DOS or ASCII WP Software 


2 On the same page or end of youfWocument FORMA TTE R 


TO ORDER, CALL OR WRITE: X BEAMAN PORTER, INC. 
M ο HALSTEAD AVENUE 


(800) 43 pr 
*Add $5 for Shipping and Handling. (914) 835.3136 IN NEW YORK 
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you write has been drugged by your 
disgruntled crew. The letter trails off 
into some really hilarious delusions. 

The program then begins: You 
awake, head splitting, to find that your 
crew has abandoned you after taking 
most of the supplies. You must attempt 
to stay alive. Managing that, your goal 
is to find the lost pyramid, make your 
way to the burial chamber, and uncover 
the sarcophagus, thus gaining respect 
and riches. 

Infidel, by any other name is an 
Adventure game. Its responses to your 
actions sometimes fill a screen with 
entertaining, mood enhancing prose — 
in that respect it is different from any 
other Adventure game program I have 
encountered. Infidel also differs in the 
complexity of the actions which you can 
enter. 

The program will accept whole sent- 
ences which combine more than one 
action or which include multiple objects 
for a verb. “Open the door then South 
then close the door then lock it” would 
be a perfectly acceptable set of com- 
mands for Infidel; as would “Put the 
torch and the map in the knapsack.” 
You are no longer limited to actions like 
“Take sword” and “Stab dragon.” 
Infidel has an extensive vocabulary so 
communication is more likely to be 
successful. If your command is a no-no, 
however, /nfidel has an extensive vo- 
cabulary to get you on the right track, 
such as “You must supply a noun” or “I 
can’t see any shovel here.” 

You can select from three levels 
(Verbose, Brief or Superbrief) just how 
wordy you want Infidel to be in its 
descriptions. The SCRIPT command 
will allow you to make a transcript of 
all of your actions with your printer. 
This is handy, but can use a lot of paper 
(especially if you select Verbose). SAVE 
will allow you to return to a certain 
point in the game after you die (and die 
you will!) without starting from scratch. 
Use SAVE early and often! 

How did 7 do? In my first attempt I 
followed a mirage across the desert (well 
hey, I was thirsty!) to my demise. I did 
get to "see" a number of entertaining 
hallucinations along the way though. 
My second attempt was much better. I 
successfully attended to tasks necessary 
to my survival, explored my surround- 
ings collecting necessary tools and 
items, located and obtained entry to the 
hidden pyramid, then promptly fell to 
my death on a stairway! Actually I was 
rather proud of my accomplishments. 

Infidel did not, however, share my 


enthusiasm — it rated me a “fumbling 
beginner." I admit it — I get to a certain 
point in my expedition and I’m stymied. 
I even know what I neéd to do, but I 
can't quite figure out how to get it done. 
I see there is a book of hints available 
from Infocom — maybe that's the 
answer. 

As Adventure games go, Infidel is 
first rate. My disappointment stems 
from my expectations that "interactive 
fiction" would be something very differ- 
ent from Adventure games. A notch 
above, I admit, but an Adventure game 
nonetheless. 


(Infocom, Inc., 55 Wheeler St., Cambridge, 
MA 02138, $44.95) 


— Stanley Townsend 


Software 1000/1200/ 3000 


Wizardry — Proving 
Grounds 


Want to go on a trip? I don’t mean 
the type of trip to nice sunny places with 
smiling faces via the “Friendly Skies.” 
This trip is to a dark, magical place 
inhabited by zombies, thieves, spell- 
carrying, evil-cursed creatures, and just 
to keep things interesting, treasures 
beyond your wildest dreams. 

Instead of boarding the great silver 
Boeing birds, the means of transporta- 
tion to this magical place is via your 
MS-DOS Tandy computer and a pro- 
gram called Wizardry. 

Wizardry is an Adventure game, 
unlike any Adventure game I've pre- 
viously played. It is a complex game, for 
one to six players, with all players 
controlling one or more characters who 
go off on expeditions in search of loot 
and glory. The more successful a char- 
acter or group is, the more powerful 
they become. Each character is special- 
ized. Some are good fighters, some can 
cast magical spells of many types, and 
some are good at defeating the many 
traps that guard the treasures. As a 
character becomes more powerful, he 
may gain some general abilities, but in 
all cases, cooperation is the key to 
success. 

The first step in Wizardry is to create 
your cast of characters. A character is 


your “alter-ego.” Like anyone, he has 
various skills, abilities and possessions. 
You control him by telling the computer 
what you want him (or her) to do. All 
the information about your character is 
kept on a scenario disk until you wish 
to use him, and after you finish a game, 
it is returned and updated. Thus as you 
continue to play with him over many 
sessions, the more you play, the more 
capabilities he gets, and the more chal- 
lenging and interesting the game be- 
comes. 

Each character has five basic charac- 
teristics. These are: 
€ Strength — affects combat ability. 
€ I.Q. and Piety — determines the 

ability to cast mage (more on this 

later) and priest spells. 

9 Vitality — modifies the amount of 
damage that can be sustained before 
death. 

* Agility — determines the order in 
which attacks occur. 

@ Luck — helps in many mysterious 
ways. 

Based on the above five characteris- 
tics, your characters may become one of 
eight classes of players. Each class has 
certain minimum characteristic scores 
that qualify a character for that class. 
As you play, and your players become 
more powerful, they may qualify for a 
better, more powerful class. 

The classes are: 
€ Fighters — The basic warrior who 

can use any weapons. The strong and 

dumb type, but handy to have on 

your side in a fight (and there are a 

lot of those). 

* Mage — The sorcerer who can use 
magical spells and very limited wea- 
pons. While Mages at first don't seem 
to have much use, those spells are 
very handy to have. 

€ Priests — The holy men who do not 
fight as well as Fighters, but have the 
ability to dispel. Some monsters in 
the maze, collectively known as the 
“undead,” can be forced back into the 
abyss from whence they came by a 
Priest's dispel. 

€ Thieves — They are very good at 
circumventing the noxious traps that 
may be between a party of players 
and some loot. 

€ Bishops — They are a combination 
of Priests and Mages, and have ad- 
vantages and disadvantages of both. 
They also have the ability to identify 
the nature of magical items, thereby 
avoiding hefty charges levied for that 
service at the castle. 

€ Samuari — They are fantastic fight- 
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ers and can begin to learn magical 

spells at advanced levels. I’m not sure 

what Japanese warriors are doing in 
an English medievel game, but what 
the heck, it’s best to relax and don’t 
let logic cloud the matter. 

Φ Lords — They are a combination of 

Fighter and Priest. 
€ Ninjas — They are inhuman fighting 

machines. Again the Japanese war- 

riors? Possibly the programmer spent 
too much time in a sushi bar. 

There are many other characteristics 
of the adventurers. Alignment (good, 
neutral or evil), race (human, elf, dwarf, 
gnome or hobbit), ability, age, wealth, 
equipment, armor, etc. These all relate 
to how the group fares as they wander 
through the game. 

After the characters are created, your 
quest for glory and treasures is started. 
The Castle is your starting and ending 
point for all expeditions. There you can 
rest, create parties, get help from the 
gods, buy and sell equipment, or go to 
any other part of the game. After you 
have gathered together in a party, 
purchased or traded for the best equip- 
ment you can afford, and rested to 
restore hit points and spells, it’s time to 


leave the safe, but expensive, confines 
of the Castle and enter the unsafe, but 
possibly lucrative, corridors of the 
maze. Here’s where the real Adventur- 
ing begins! 

Wizardry uses a 3-D low-resolution 
perspective plot of the maze as you 
would see it if you were actually there. 
You see the walls of the maze extending 
into the distance. By using spells (if one 
of your group can use spells — hint, 
hint), you can light up the maze so you 
can see farther and see hidden doors. 

Without some sort of challenge, 
Wizardry would be just a game of 
mapping. Well, fear not, challenges 
abound in the form of monsters. Some 
are wandering around, some reside in 
rooms. In any case, since they generally 
do not like being disturbed by outsiders, 
and really do like the taste of human (or 
other) flesh, it is likely that a good many 
fights will occur. The outcome depends 
on how well-prepared you are and the 
actions you choose to execute at a given 
time. Luck doesn’t hurt either. 

The object of this Dungeons and 
Dragons-type game is to survive, gather 
as much treasure as possible, return to 
the Castle and then go out and do it 


again. As you complete a foray in the 
maze, your characters hopefully gain 
strength and ability and the next excur- 
sion can be more successful, going to 
deeper and deeper levels of the maze. 
Unfortunately, your characters may not 
always be so fortunate as to return alive. 
But, spells, magic and often large sums 
of money have been known to reincar- 
nate many a player. 

If your idea of a good relaxing time 
on the computer is a quick game of 
Donkey Kong, Wizardry is not for you. 
This is a game that requires your atten- 
tion for hours at a time, time after time. 
It’s best played in the company of fellow 
Adventurers who can share ideas and 
experiences to successfully return from 
the depths of the maze. 

If this extended type of Adventure 
has been of interest to you, Wizardry is 
a well-programmed, well-documented 
example of an interactive fiction fan- 
tasy. 


(Sir-Tech Software Inc., 6 Main Street, 
Ogdensburg, NY 13669; 315-393-6633, 
$59.95) 


— Bruce Rothermel 
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TO 
896K 


OF DOS ADDRESSABLE RAM 


Includes RAMdisk Software at No Extra Cost... 
Add 640K of External RAM Memory to TANDY 2000's* 
256K of Internal RAM Memory for a total of 896K of DOS Ad- 
dressable RAM. 
* * New Products Available Soon x x 
(Send for catalog) 
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Use spare memory to simulate one or more super—fast 
disks. Any size.  Greatly speed up existing applications. 
Appears to programs as a disk, but gives instant 
access. Highly efficient, compact, and thoroughly tested. 
Includes program to install and change RAMDISK size, 
and RAMDISK I/O access report. 


FULLBACK ($88) 


A Perfect File Backup System !!! 


Finally, an easy to use backup program that keeps exact 
images of your files on backup floppies, cartridges, or 
hard disk. Automatically backup one veral, or A 

subdirectories. Backup modified only, or ALL files. 
Keeps perfectly organized backups — backup structure and 
file format are identical to original. Supports backup by 
date, multiple backup copies, large files (up to 32MB). 
Far superior to DOS BACKUP, easier to use, and much 
more reliable. Absolutely a MUST for hard disk users. 


HIP—POCKET HELPERS υ 


The ALPS Hip—Pocket Helpers is a collection of 
powerful and easy to use utility programs. They 
include a slick Directory Tree, a sorted 5—across directory 
display, a sophisticated keyboard substitution aid (only 5K 
of RAM), utilities to search through ALL directories for 
file names or even strings within a file, and much, much 
more. 29 utilities in all. Call or write for info. Price 
and performance you can’t find elsewhere. 


ALL ALPS Software is Fully Guaranteed !!! 
Full Customer Support on our Hotline — 303—687—1442 
Call or Write for our complete catalog of products. 





ALPS 
1502 County Road 25 
Woodland Park, Colorado 80866 


800—232—ALPS (Toll-Free) 
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approved for the PCM Seal of Certification, your — 
assurance that we have seen the product and have 
ascertained that is what it purports to be. This month 
the Seal of Certification has been issued to: — . 










Adventure Alpha, a unique 
Adventure game in which clas- 
sic mathematical and logic 
problems must be solved in 
order to survive and locate 
treasures. Requires Tandy 
1000, 1200 or 3000 and graphics 
option. Milliken Publishing 
Co., EduFun! Division, 1100 
Research Boulevard, St. Louis, 
MO 63132, (314) 991-4220. 
$34.95. 


BASIC Programmer's Toolkit, 
a utility for BASIC programmers 
which will print formatted pro- 
gram listings and cross refer- 
ence listings. Will also remove 
non-referenced program lines 
for more effecient compiling. 
Requires Tandy 1000, 1200, 
2000 or 3000. MVP Software, 
1035 Dallas SE, Grand Rapids, 
MI 49507, (616) 245-8376, 
$39.95, 


The Black Cauldron, an ani- 
mated Adventure game based 
on the Walt Disney movie by 
the same name. Requires Tandy 
1000, 1200 or 3000 and graphics 
option. Sierra On-Line, Inc., 
avaiable through Radio Shack 
stores nationwide, $39.95. 


The Cheapware Text Editor, a 
text editor to be used primarily 
for writing and editing pro- 
grams. Requires Tandy 1000, 
1200 or 3000. Robert L. Nico- 
lai, 4038 N. Ninth Street, St. 
Louis, MO 63147, $20. 


The Cheapware BASIC Pro- 
gram Mender, will read dam- 
aged BASIC program files and 
attempt to recover any lost 
portions of the program file. 
Requires Tandy 1000, 1200 or 
3000. Robert L. Nicolai, 4038 
N. Ninth Street, St. Louis, MO 
63147, $20. 


Chuckle Pops, a background 
program that, when called, will 
“pop up” jokes on the screen, 





even while running other appli- 











Tandy 1000, 1200 or 3000. En- 
lighten, P.O. Box 2037, Ann 
Arbor, MI 48106, $14.95. 


Cormail, prints mailing labels 
from Desk Mate files, Requires 
Tandy 1000, 1200, 2000 or 3000. 
Corwin Software, 10066 West 
Mawman Avenue, Waukegan, 
IL 60087-2431, (312) 623-4114, 
$30. 


DPATH+Plus, a disk file redi- 
rection utility that allows your 
programs to read and/or write 
any file, in any directory, on 
any disk drive. Requires Tandy 
1000, 1200 or 3000. Personal 
Business Solutions, Inc., P.O. 
Box 757, Frederick, MD 21701, 
(301) 865-3376, $45. 


Fortune Teller, tells your for- 
tune based on Hindu astrology. 
Requires Tandy 1000, 1200, 
2000 or 3000. X YTON, Brown- 
Wagh Publishing, Inc., 800 
Charcot Avenue 110, San Jose, 
CA 95131, $39.95. 


Golf Classic and Battling Bugs, 
two games that teach angles 
and length estimation. Requires 
Tandy 1000, 1200 or 3000 and 
graphics option. Milliken Pub- 
lishing Co., EduFun! Division, 
1100 Research Boulevard, St. 
Louis, MO 63132, (314) 991- 
4220, $34.95. 


Gulp!! and Frenzy, two math 
skill development programs 
where the student tries to save 
small fish from being eaten by 
larger fish or an alligator by 
correctly answering math prob- 











New Products 











lems. Requires Tandy 1000, 
1200 or 3000 and graphics op- 
tion. Milliken Publishing Co., 
EduFun! Division, 1100 Re- 
search Boulevard, St. Louis, 
MO 63132, (314) 991-4220, 
$34.95. 


HomeWord Plus, a personal 
word processing package with 
spelling checker. Requires 
Tandy 1000, 1200 or 3000. 
Sierra On-Line, Inc., Coarse- 
gold, CA 93614, $69.95. 


The Islands of Beta, an educa- 
tional Adventure game which 
teaches problem solving, logic 
and creative thinking. Requires 
Tandy 1000, 1200 or 3000 and 
graphics option. Milliken Pub- 
lishing Co., EduFun! Division, 
1100 Research Boulevard, St. 
Louis, MO 63132, (314) 991- 
4220, $34.95. 


King's Quest II, an animated 
Adventure game. Journey with 
King Graham and help him 
unlock the secrets that may lead 
him to the enchanted maiden 
for whom he longs. Requires 
Tandy 1000, 1200 or 3000 and 
graphics option. Sierra On- 
Line, Inc., avaiable through 
Radio Shack stores nation- 
wide, $39.95. 


Mastering the Tandy 2000, a 
book by Dan Keen and Dave 
Dischert which goes beyond the 
material in the standard 





By awarding a Seal, the magazine certifies the 
program does exist, but this does not constitute any 
guarantee of satisfaction. As soon as possible, these ᾿ 
hardware or software items will be forwarded to 
PCM's reviewers for evaluation. 


cation software. Requires | i : ; | 


eee 
owner’s manuals. Provides ac- 
tual working program exam- 


ples. Tab Books, Blue Ridge 
Summit, PA 17214, $10.95. 


MathFun Math Sequences, a 
series of math-oriented educa- 
tional software combining drill 
exercises with positive rein- 
forcement. Available packages: 
Addition Sequences, Division 
Sequences and Subtraction Se- 
quences. Requires Tandy 1000, 
1200 or 3000 and graphics op- 
tion. Milliken Publishing Co., 
EduFun! Division, 1100 Re- 
search Boulevard, St. Louis, 
MO 63132, (314) 991-4220, 
$34.95 each. 





Portable Light, a battery- 
operated, adjustable light for 
use with portable computers. 
Helps you read portable com- 
puter LCD screens in low-light 
conditions. 4M RO Computer 
Services, P.O. Box 948, Lake 
Oswego, OR 97034, (503) 692- 
5926, $6.99. 


Rud's Review, an electronic 
guide to mutual funds. Re- 
quires Tandy 1000, 1200 or 
3000. Visual Information Sys- 
tems, Inc., P.O. Box 42106, 
Washington, DC 20015, 1-800- 
638-2000, $39. 





Software Bridge, converts doc- 
uments generated with one 
word processing package into 
documents compatible and ed- 
itable with another word pro- 
cessing package. Supports Dis- 
play Write3, MultiMate, Sam- 
na Word III, Word MARC, 
WordPerfect and WordStar. 
Requires Tandy 1000, 1200 or 
3000, 512K. Systems Compati- 
bility Corporation, One East 
Wacker Drive, Suite 1320, Chi- 
cago, IL 60601, (312)329-0700, 
$249. 
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Using BAREAD 2.1 


Bar code listings must be 
read in numerical order begin- 
ning with Line 1 and contin- 
uing through the last line of 
the listing. The computer 
display is used to prompt you 
as to which line to scan and 
give you warning messages 
should you happen to get out 
of step. 

When you run BAREAD, it 
asks you to scan the first line 
of the bar code listing. This 
line contains the name of the 
program as well as the begin- 
ning of the program itself. The 
computer will sound a high- 


BAREAD 2.1 


19090 ' *** Initialize ΧΧΧ 
19019 ON ERROR GOTO 1949 
1020 CLEAR 1099:MAXFILES-2 
1939 GOTO 1959 


1049 IF ERR=5 THEN RESUME NEXT 


1959. ON ERROR GOTO; 9 
1969 RUNM "B3OF9" 


1079 OPEN "WAND:" FOR INPUT AS 41 
1989 UC&--l 
1999 PO$-"9123456789ABCDEFCHIJKIMNOPQRST 
haee ote ames itm RE $+" 

1190 DIM RW$(36) 
HHH ER$(1)="You must scan line l first! 


1129 ER$(2)-"You've SKIPPED a line!" 
1139 ER$(3)="You've ALREADY SCANNED this 


line!" 
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pitched beep whenever it's 
ready for you to scan a line. 
After a line has been success- 
fully read, you'll hear a lower 
beep. A "blip-bloop" sound 
prompts you to turn your 
attention to the screen for a 
message. You'll hear this when 
you accidentally scan a line 
out of sequence. 

After reading the first line, 
you continue scanning with 
the second line. Remember to 
wait for a high beep before 
scanning and then listen for 
a low beep to indicate a suc- 
cessful read. 


Once the last line of the 
listing has been scanned, 
BAREAD will return control to 
the Tandy 100/200 menu 
screen. Note that the program 
you just scanned is now in the 
directory with a .00 extension. 

The final step is to convert 
the .DO text file to a normal 
BASIC program. This is done 
quite simply by going to BASIC 
and loading the file with a 
command such as LORD^TEST 
.DO^ (if the program name 
were TEST). The program will 
load into BASIC and will be 
ready to run. To save the 
program in BASIC's com- 
pressed format (.BA exten- 
sion), you'd type SRVE “TEST” 
(if the program were named 
TEST). You may then kill the 
-DO file with KILL “TEST.DO”. 


1149 ERS(A4)-"Code not PCM2/39 format!” 
1150 ER$(5)="Command not applicable here 


τα 


1160 ER$(6)-"You cannot skip this line!" 
117g ER$(7)2"Selected resume file not in 


computer!" 


1189 ' *** Read Reserved Words List www 


1199: DATA BEEP,CLEAR; CLOSE,DATA,DEFDBL,D 


EFINT ,DEFNG, DEFSTR, ELSE, GOSUB , GOTO 
1299 DATA INKEYS$ ; INPUT, INSTR( ,LCOPY, LEFT 


SC; LINE(, LOADM, LPRINT,USING,MAXFILES 


1219 DATA MID$(,NEXT, PEEK, POKE, POWER, PRE 


SET PRINT, READ, RESTORE, RETURN, RIGHTS ( 
1229 DATA SOUND, SPACES ( , STRINGS (, THEN 


1239 FOR I$-1 TO 36:READ RWS$(1%) :NEXT I$ 


1249 ' *** Procedure Begins Here *** 


1250 CLS:PRINT(44,"PCM Bar Code Program 


Reader v2.1" 


(217,16),1,B 


1269 LINE(29,4)-(219,18) , 1, B: LINE(22,6)- 










1279 NNSC1 


“COTO 1280 






ER$-5:GOSUB 1620:GOTO 1289 

1300 IF LL$-0 THEN ON INSTR("ALSR", T). 
GOTO 1820,1899,1989,2050 

1310 IF LL$-1295 THEN 1350 

1320 IF LL&«2NN& AND NN%=1 THEN ER%=l: 60 
SUB 1629:GOTO 1289 

1339 IF LL$«NN* THEN ER$-3:GOSUB 1629: GÒ 
TO 1289 

1340 IF LLASNN& AND NN@>1 THEN ER? GOS 
UB 1629:GOTO 1289 
1359 IL$=RIGHT$(IL$,19) 

1369 IF LL&-1 AND NN$»0 THEN GOSUB 1789 
1379 CL$-CLS4IL$ ΠΠ 
1389 FOR 14-1 TO LEN(CLS$) | 

1390 CHS=MIDS(CLS, 19,1) 

1400 ' IF CH$-"*" THEN GOSUB 15391 IF NL 
% THEN 1479 ELSE GOTO 1449 

1419 
% THEN 1470 ELSE GOTO 1449 





















1420 IF CH$-"." THEN UCS-NOT(UCRS):GOT 
0 1450 
1439 IF CHS4S"A" AND CHS<="Z" AND NOT 





(UCS) THEN CHS=CHR$(ASC(CHS$)+32) 

1449 XX$-XXS4CH$:IF RIGHTS (XX$;1)=CHR 
$(13) THEN PRINT42,XX$; ος L UCt=-1 
1450 NEXT 1% 

1469 ο θα" 

1476 PRINT@200 , SPACES (89) ; 

1480 IF LL&<>1295 THEN NN$-LL&41:COTO 12 
8g | 

1499 |! wee Done *** 

1500 CLOSE:CALL 61897!:CLEAR 599; HIMEM: M 
ENU 

1519 ' ΧΧΧ Decode Reserved Word *** 

1520 NL$&-0:IF IS>LEN(CL$)-1 THEN NL$--1: 
CL$="%" GOTO 1549 

1539 I&-I$4-1:CH$-RW$ (INSTR(PCS, MIDS(CLS, 
I$,1))) 

1540 RETURN 

1559 ' ΧΧΧ Decode Hex and Control Charac: 
ters Xix 

1560 NL%=0@: IF IS2LEN(CLS$)-l THEN Niel: 
CL8e"/":GOTO 1619 

1579 I$-I$41:IF INSTR("/$." MIDS (OLS, Te, 
193250 THEN CHS=MID$(CLS$,1%,1):GOTO 1619 
1589 IF I%>LEN(CL$)-1 THEN NL@=-17CL$=RI 
GHTS (CLS 2): COTO 1619 

1590 HX$=MID$ (CLS , 1%, 2}: CHS-CHR$ ( (INSTR(. 
"0123456789ABCDEF" , LEFTS(HX$, 1))-1)*16-I 
NSTR("0123456789ABCDEF" , RIGHTS (HX$,1)) +1 
) | : 
1600 I%=I%+1 

1610 RETURN 

1620 ' *** Error Codes 3** 

1639 SOUND 5900,10:SO0UND 8999, 19; SOUND 5 






























1289 GOSUB 1669: IF ERASU THEN GOSUB. (162g. 


1299 IF LL%=0 AND INSTRONYN", 1L$)>9 THEN 


IF CH$="/" THEN GOSUB 1559:IF NL 





999519 


hung PRINTQ229- ο... ο... | 


{1656 RETURN 
(1660 ' *** Get Code Line xx 


1670 PRINTQ173,""; 
e ###" NN $ HI 
1689 IF NN$--l THEN: PRINTOI73, "Scan. oy 
line!" GOTO 1799 ! 


SPRINT USING "Scan i lin 


11699. SOUND 599,5. il 
(11709. INPUT#1, ILS: ERS=0 


1719 FOR 1$=1 TO LEN(ILS) Hi} 
1729 IF MIDS(ILS, Is,1)e"!" THEN "ec 


άγονη 


1739 NEXT 14 fii 
1749 IF LEN(IL$)<>1 AND LEN CILS) >21 μι 
N/ER$-A:RETURN | 

1750 IF LEN(ILS)-l THEN LL$-W; RETURN 


1151760: LLS-LEFTS (ILS, 2) : TMC EMR KATANA] l 
‘678 9ABCDEFGHIJKLMNOPQRSTUVWXYZ" , LEFTS$ (LU ή 
/8/1))- 1) *36CINSTR ("0123456789ABCDEFGHIJK. 


LMNOPQRSTUVWXYZ" , RIGHT$(LL$,1))-1 | 
17790 RETURN 

1780 ' *** Open Program File ΧΑΝ. ff 
1799 PNS=LEFTS (IL$; 6): T19-RIGHTS (TLS, ΤΕΝ... 

(IL$)-6) 


1890 OPEN PN$ FOR OUTPUT AS 42 
1810 RETURN 


1829 ' **& Abort *** 
1830 BEEP: BEEP: BEEP 
1849 PRINT@299,, "ABORT! 
1850 INPUT#1, ANS | 
1860 IF INSTR("YN", AN$)-0 THEN BEEP: PRIN | 


Are JO sure?" ; 


|10251,"Scan 'YES' or 'NO'":GOTO 1859 


1879. PRINTQ209 , SPACES (89) ; B 
1880 IF AN$-"Y" THEN CLOSE:KILL BNS+" DO! 
":GOTO 149% ELSE GOTO 1289 
1899 ' *** Skip Line ΧΑΝ 
1999 IF NN&-1 THEN ER&-6:GOSUB 1629: GoTo i 
1289 | HBHH 
1910 BEEP: BEEP: BEEP 
1920 PRINT@219, "SKIP! 
1939 INPUT#1 ANS 
1940 IF INSTR("YN" ,AN$)=0 THEN BEEP: PRIN | 


Are you vidi 


"Te251,"Scan "YES" or 'NO'":GOTO Tun i HHH 


1959 PRINT@200,SPACES(80); 
1960 IF ANS-"Y" THEN NNS=NN¥+1 


| 1970 GOTO 1289 


1989 ' *** Stop & Save ek 
1999 BEEP: BEEP: BEEP ; 
2000 PRINT@297 "STOP & SAVE! ipd P biloj sur 

anni " 
2919 INPUT&1,AN$ 
2920 IF INSTR("YN".ANS)-U THEN BEEP: PRIN 


“T@251,"Sean 'YES' or 'NO'":GOTO ΠΡ 


2039 PRINT@200, SPACES (89) ; 


2049 IF ANS="Y" THEN 1499 ELSE GOTO idt 


2059 ' ΧΧΧ Resume *** 
2069 IF NN%<>1 THEN ER&-5:GOSUB Miu Gor 
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0.1289 2120 ON ERROR GOTO. 2149 
2070 PRINTQ254,"Resume Mode"; 

2080 NN%=1:GOSUB 1669 

2090 IF LL$-9 THEN ER%=5 ELSE IF LL%<>1 
THEN ER$-1 

2199 IF ER%>Q THEN GOSUB 1629:GOTO 2960 
2119 PNS-MIDS$(ILS$,3,6) 


2149. RESUME 2159 

2150 CLOSE $2 

2160 ER&-7:GOSUB 1629:GOTO ΤΉΝ 

2179 CLOSE #2:OPEN PNS FOR APPEND , AS # 


APRIL.BA (FROM PAGE 102) 


122 


vll: 
2 [[ΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΙΙΠΠΠΠΠΠΠΠΠΠΠ/ΠΠΐ1||| 
AMMAN 
μμ, 
IIIIIIIIIIIIIIIIIII¿IAIIUIIAIIIIƏIÉIIŠIIII 
ƏIIIIIIIIIIIIIIIIIIIIAIIIIII—IIIIIIII 
ANAL QUEUE 
@IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
LAQUEUM 
1ο [IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
11 NNO ON AN O 
12 D T e M MA A MIDI 
13 MONON 
14 llllIIIIIIIIIIII!IIIIIIIIIIIIIIIIIIIIIIIIIINIIIIIIIIIII 
15 ΤΙΝ 
16 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
17 [ΙΙΙΠΠΠΠΠΙΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠ}/ΠΠΠΠΠΠΠ} 
18 MONI EH M 
19 ΙΙΙ 
20 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
21 lll! 
22 IIIIIilllIIIIIIIIIIII!IIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
23 I|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIÑ 
24 ΤΙΜΗ 
a I L N N A A 
a OI E M N ANAL 
22 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIIIIIIIIIII 
E A N A ALUA 
MINN AE 
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σ 5. ^w Fo 


N 





2188 NN%=-1:GOTO 1289 





BURY.BA (FROM PAGE 102) 


a NUN M 
ο NEIN 
ο ANN EP EAM 
4Η 
5 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
αλ μμ, 
7 ANONCO ONO A OO ON 
ο AT NAA 
9 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
10 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
11 |lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
12 |llIIIIII!IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
13 ΤΙΜΗ 
14 ||IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
15 ΙΙΙ 
16 A TIO UA M 
12 l!liIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 


BOAL.BA (FROM PAGE 38) 


ο OAOA OON O T 
2 N AA ANM 
3 ΙΙΙ 
ο μμ 
SIlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIIIIIIII 
6 μΠΙΙΙΠΙΙΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠ111|1|||1} 
ΝΕ M 
8 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
9 III!!! 
ιο IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
11 ΤΙΜΗ 


12 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIINIIIIIIIIIIIII 
13 ΙΙΙ 
14 AMOUNT UAM 
15 ΙΙΙ 
16 NN AEN 
12 AMARUM 
μα μμ. 
13 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
a VO AAA M 
21 |lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII NM 
22 [[1ΠΠΠΠΠΙΠΠΠΙΠΠΙΙΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠ} 
23 lllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
24 MNO UM 
25 N aI MDD n L 
26 ΙΙΙ 
22 MOO I O ONA NM 
ο LM 
25 ANDANN ANOA INON ON AM 
30 NNUA LUNN ANOA A AM 
31. [ΙΙΙ 
22 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
33 ΙΙΙ 
34 [AMMO ΤΙΜΗ 
35 [ΙΙΙ 
36 [[ΠΠΙΠΠΠΙΠΠΠΠΠΠΠ//ΠΠΠ1111]|]|}|}}1Π}Π}{{|{{|||||1 
3? ΙΙΙ 
38 ΙΙΙ 
39 |lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
ο μμ 
αι [ΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΙΠΠ 
42. [ΠΠΠΠΠΙΙΙΠΙΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΙΠΠΠΠΠΠΙΠ} 
η AAA 
ο μμ. 
45 lllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
“6 ANNAD NM O 0 N 
2? ANOUN 
ο UNAM 
43 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
59 MINION A UAM 
51 [ΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΙΠΠΠΠΠΐ1Π}|Π{ΠΠΠΠΠΠΠΠΠΠ 
52 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
53 ΙΙΙ 
54 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 


55 JONATHAN UAM 
56 [ΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΙΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠ/ΠΠΠΠ| 
52 ΤΙΜΗ 
58 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
55 NATA A AM 
6ο [ΙΙΙ 
οι ΙΙΙ 
62 ΠΠ 
63 [ΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠ!ΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠ} 
ϱ4 [ΙΙΙ 
65 QNIN AULAM 


BOA2.BA (FROM PAGE 39) 


ο AU 
2 III! 
3 lll! 
ο AUAM 
m T μμ. 
L μμ 
2. JEANNE AA UAM 
8 [ΠΠΠΠΠΠΠΠΠΠΠΠΠΠ/Π/ΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΙ 
ο AM 
19 [MANNA ULL 
11 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
a T OU AM 
13 ΤΙΝ 
14 (AVON 
15 ANOIA ONU AMA OONO ONONO NO AA N 
16 AMNION NERA NM 
17 L A It D n MO N 
18 [lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
19 MANARE HAM 
20 MINN ZIN AUO T 
21. [AAA PL 
22 [[|ΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΙΙΠΠ} 
23 IIlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
24 JEANNE AUAM 
25 MIMI UN 
26 MIO UAM 
22 III!!! 
28 VANOUN NUAN OO AA LU LM 
23 III! 








Ili ΙΙΙ AMAN 


fibort Skip Line Stop & Save 





III [1110 ΙΙΙ 


Resume Yes No 
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30 [[1{ΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΙΠΠΙΠΠΠΙΠΙΙΙΠΠΠΙΙΠΠΙΕΙΠΙΙ 
AMMAN 


32 [|1ΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΙΠΙΠΠΠΠΙΠΠΠΠΙΙΠΙΙΙΠΠΠ 


33 [|lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
34 [ΠΠΙΠΠΠΙΙΙΙΙΠΠΠΙΙΠΙΙΠΠΠΠΙΠΠΙΙΠΠΠΙΙΠΠΙΠΠΠΙΙ 
35 ΙΙΙ 
36 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
32 IIlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 


MCODE.BA (FROM PAGE 24) 


124 


ο Εμ... 
ο μα. 
3 lIIIIIIIIIIIIIIIIII!IIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
4 ΙΠΠΠΠΠΠΠΙΠΙΠΠΠΙΠΠ!ΠΠΠΠΠΠΙΠΙΙΠΠΠΠΙΙΠΠΠΠΙΠΙ 
5 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
6 [ΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙ 
?lIIIIIIIIIIIIIIIIIIIIII:IIIIIIIIIIIIIIIIIIIIIIIIIII 
8 III! 
9 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
ιο ANNA UN 
11 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
12 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
13 ΤΗΝ 
14 I E μμ. 
15 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
16 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
12 IllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIIIIIIIIII 
18 |lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
19 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
20 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
21 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
22 IMINO 
23 MUUNTUU UIDON OAN 
24 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
25 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
26 a A n t a AI IA D 
27 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
26MIN 
23 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIN 
30 [[]ΠΠΠΠΠΙΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΙΙΙ 
31 ||IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
32 ΙΙΙ 
33 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
34 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
35 [lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
36 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
zA A L A 
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38 [IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
sEm I TT I D I T 
40 [IIIIIIIIIIIIIII:IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
41 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
42 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
“3 IIIIIIIIIIIIIII:IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
Ean N a E i Ar ITT T 
45 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
“6 [IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
2? !llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
“8 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
43 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
se. MIRA NUNQUAM 
51 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
52 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
53 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
SE A UAI 
55 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
56 [ΙΙΙ 
52 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
E AAA UN 
59 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
6ο [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
οι [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
62 ΙΒΜ 
63 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
64 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
65 MANIERA UU 
66 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
6; lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
68 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
65 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
29 n L a UNUM 
23. [ARIA UA UM 
22 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
23 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
24 LLL LU LLL P LLL LLL) M 
m AAA 
26 ΙΙΙ 
22 ΤΝ 
An r I A I AIA A A 
a LL 
8ο ARIA 
81 lllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
82 IlIIllllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
83 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
EE A I L NE 
85 UU L A D A LU UL 


86 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
A I OINA O 
88 I I O IM 
EE N AUN 
90 AADA μμ, 
91 |llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
22 IllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
μμ 
ο ΤΝ 1. 
55 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
αμ OM 
92 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
58 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
93 ΙΙΙ 
100 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
τοι lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
102 ΙΙΙ 
103 ΙΙΙ 
104 |lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
105 ΙΙΙ 
106 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
17 ΙΙΙ 
198 MINIVAN OAN O NM 
109 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIIIIIIIIIIII 
110 L ONIN ME MIL 
ο Ημ. 
112 ΙΙΙ 
113 ||IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
114 ΙΙΙ 
115 ΤΙΝ 
116 μμ. 
117 ΙΙΙ 
118 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
119 μμ. 
129 ΙΙΙ 
121 ΤΙΝ 
122 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
123 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
124 MNNOO OOA 
125 ΙΙΙ 
126 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIÑIIIIIIIIIII 
122 ΙΙΙ 
128 NINNIN II N 


Abort Skip Line Stop & Save 





Resume Yes No 


BIG100.BA (FROM PAGE 62) 


ΙΙΙ 
2 ΙΙΙ 
3 ΙΙΙ 
4 r A 00 A L E a T L 
5 ΙΙΙ 
6 μμ 
ο Ημ 
8 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
1ο lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
11 QUALI AUAM 
12 |lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
13 T o A a T L E A A 
14 ΤΝ 
15 ΤΙΝ 
16 ΙΙΙ 
1? |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
QUANH ULM 
19 [llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
29 {AMINA IA AUN 
21 ΙΙΙ 
22 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII:IIIIIIIIIIIIIIIIIIIIIIIIIII 
23 |lIIIIIIIIIII!IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIININI 
24 ΜΙΝΙ 
ea N aE n a N N 
26 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIINIIIIIII 
2? IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
28 ANUANI A O 
25 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
30 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITII 
31 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
32 ΙΙΙ 
33 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
34 [ΙΙΙ 
35 [ΙΙΙ 
36 ΙΙΙ 
32 ΙΙΙ 
38 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
39 ΙΙΙ 
«ο I A N A O M 












L ΙΙΙ 
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41. ΙΙΙ 
42. ΙΙΙ 
43 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
44 MIU ANIM 
45 [UIN M 
“6 [ΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠ1} 
47. ΗΝ 
48 ΤΙ 
43 IIlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
5ο AAT N T 
51 [ΙΙΙ 
52 MMIII OA ATA 
53 ANNUI U A 
54 JANI NALE IAM 
55 AMALIA AUAM 
56 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
ο EH UM 
58 ΙΙΙ ΙΙΙ 
59 ΙΙΙ 
6ο ΙΙΙ ΙΙΙ 
ο EA LM 
62 ΙΙΙ 
63 [[ΠΠΠΠΙΠΠΠΠΙΠΙΙΙΠΠΠΠΠΠΠΠΠΠΠΠΠ{ΠΠΠΠΠΠΠΠΠΠΠΠΙΙΠΠΠΙ 
64 [ΙΙΙ 
65 NMI ATA LM 
66 ΙΙΙ 
62 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
68 NATRII AAA 
65 ΙΙΙ 
29 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
μμ PU 
22 ΙΙΙ 
23 III!!! 
24 ΙΙΙ 
25 ΙΙΙ 
26 [ΙΠΠΠΙΙΠΠΙΠΙΠΠΠΠΠΠΠΠΠΠ/ΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠ} 
22 [AMARUM 
28 lllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
23 ΙΙΙ 
8ο ΜΙΝΙ 
81 [ΙΙΙ 
82 ΙΙΙ 
83 ΝΤΙΠ 
μμ. 
85 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
86 [ANTILLE AP 
8? ΙΙΙ 
88 [ΙΙΙ 
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89 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
90 MNONO OTN NT 
91 lllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIIIIII 
92 ΙΙΙ 
93 ΙΙΙ 
94 ΙΙΙ 
95 MINION A M 
56 AARAU AM 
2? [ΙΠΙΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠ/ΠΠΠΠΠΠΠ1 
8 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
s lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
19ο MANNI UR 
101 [[|ΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΙΠΠΠΠΠΠΙΠΠΠΠΠΠΠΙΠΠΠΙ 
192 ΙΙΙ 
193 ΙΙΙ 
104 |lIIIIIIIIII!III:IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
105 MVNA NIAAA AM 
106 ΙΙΙ 
192 ΙΙΙ 
198 l|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
109 I|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
110 U A LA D LAM 
ο Ημ, 
112 ΙΙΙ 
113 [lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
114 ONAN AN 
115 ΙΙΙ 
116 ΤΝΤ) 
112 AMINA T 
118 ΙΙΙ 
119 ΙΙΙ 
129 |lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
121 MII OH 
era LU OO I N A N LOM 
123 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
124 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
125 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIT'IIIIIIIIIIIIIIIIIIII 
126 ΙΙΙ ΙΙΙ 
122 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
128 NNAM ON AU IONA OO N 
129 I|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIÑI 
130 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
131 l|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
132 ΙΙΙ 
133 [ΙΙΙ 
134 TULONO OO OTM O I 
135 |AIM 000000 O L d N O 
136 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 


132 ΙΙΙ 
138 ΙΙΙ 
139 ΙΙΙ 
140 ΙΙΙ 
ο μη. 
142 ΙΙΙ 
143 ΙΙΙ ΙΙΙ 
144 ΤΙΝ 
145 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
14 ΙΙΙ 
142 ΙΙΙ 
148 [ΠΠΠΠΠΠΠΙΙΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠ1]/ΠΠΠΠ11} 
149 MNONO DOOU ODN LAM 
150 [MINNIE M 
151 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIW 
152 ΗΝ 
153 ΤΙΜΗ 
154 ΙΙΙ 
155 |lIIIIIIIIIIIIIIIIINIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
156 [ΙΙΙ 
152 ΙΙΙ 
158 ΜΙΝΙ 
159 N U N DIN A A N D L 
16ο |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
161 [MARIHUANA RAM 
162 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
163 ΙΙΙ 
164 ΙΙΙ 
165 [ΙΙΙ 
166 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
162 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIÑ 
168 IMINO NN M0 RUDI 
169 ΜΙΝΙ 
129 ΙΙΙ 
121 ΤΙΝ 
122 ΤΙΝ 
123 ΙΙΙ 
124 ΙΙΙ 
125 [ΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠ1Π|1| 
126 ΙΙΙ 
122 ΙΠΙΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙ 
128 lllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
179 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIIIIIIIIIIIIIIIII 
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18ο llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
181 ΙΙΙ 
182 ΙΙΙ 
183 ΙΙΙ 
184 ||lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
185 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
186 ||lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
182? ΜΙΝΙ 
188 {AMMONIUM IAC LAN IM 
CEE T ARNE LI O LT 
190 MOUND ON DOON 
191 ΙΙΙ 
192 ΙΙΙ 
193 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
194 ΙΙΙ 
195 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
196 ΙΙΙ 
197 ΙΙΙ 
198 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
EEE I A A 
290 ΙΙΙ 
291 ΙΙΙ 
292 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
293 [[|{ΠΠΠΠΙΠΠΠΙΙΠΠΠΙΙΙΙΠΠΙ]ΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠ| 
294 ΙΙΙ 
295 TANDAAN AUA OAOD N OAT 
206 l|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
202 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
298 I|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
293 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
210 [IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIÑ 
211 DANIA 
212 ΙΙΙ 
213 [lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
214 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
215 MIMI QAAE LAM 
216 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
212 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
218 MNO AAA AM 
219 ΙΙΙ 
220 ΙΙΙ 
221 ΙΙΙ 
222 ΙΙΙ 





ΙΙΙ ΙΙΙ ΙΙΙ 
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223 I|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
224 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
225 r IL LM 
226 IlIIIIIIIIIIIIIIIIIINIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
222 ΒΙΕΝΝΗ 
228 III!!! 
223 ΙΒΜ 
230 ΙΙΙ 
231 ΙΙΙ 
232 JAMMIN UMMA O OT 
233 (MUTANT AULAM 
cena A W M AE L E LE a 
235 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
236 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
237 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
238 [[|[|ΠΠΠΠΠΠΠΠΠΙΠΠΠΠΙΠΠΙΙΙΙΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΙ 
239 ΙΒΜ 
249 IlIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIIIIIIIIIIIIIIIIII 
241 lIlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
242 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
243 ANTA HAT EUR EU 
244 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
245 I I T a aat DA T D 
246 IIIIIIIIIIIIIIIITIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
242 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
248 [ΙΙΙ 
249 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
250 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
251 T ea t D t 
252 NONDO OONO ONN A OA 
253 IIIIIII!IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
254 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
255 MANONO OUO AORA DOON OT 
256 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
252 IllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
258 ΜΙΝΙ 
n UMNO AON NEU UM 
260 ΙΒΜ 
261 [IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
262 IllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
263 [[||11ΠΠΙΠΠΠΠΙΠΠΙΠΠΙΠΙΠΙΠΙΠΠΠΠΙΠΠΠΠΙΠΙΠΠΙΠΙΠ 
264 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
265 ΙΒΜ 
266 ΙΒΜ 
aza i a a D e 
268 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
269 IllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIIIIIII 
270 [[]|ΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠ]ΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΙΙΠΙ 
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221 [MANARE AUO N UU 
222 ΙΙΙ 
223 ΙΙΙ 
224 ΙΙΙ 
225 a L NUUAM 
276 IIlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
222 ΙΙΙ 
278 ΙΙΙ 
279 [AARAU EUM 
280 L OU 
281 ΙΙΙ 
282 ΙΙΙ 
283 ΙΙΙ 
284 [URNA UU 
285 ΙΙΙ 
286 ΙΒ 
ezan A a N L 
288 a E A T 
289 [NIAI NUN 
290 MANNANNA OON OOOO O 
251 [MANIERA UU 
292 ΙΙΙ 
233 ΙΙΙ 
294 ΙΙΙ 
235 ΙΙΙ 
256 ΙΙΙ 
raa L D a a 
258 ΙΙΙ 
235 ΙΙΙ 
ecn A T A 
391 ΙΙΙ 
302 ΙΙΙ 
393 JAAIANTANN OUI N 
304 ΙΙΙ 
305 ΙΙΙ 
306 ΙΙΙ 
302 ΙΙΙ 
308 ΙΒ 
309 [MANNI UU 
310 NNN ANTONIA O N N 
311 ΙΙΙ 
312 ΙΙΙ 
313 ΙΙΙ 
314 [|lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
315 AMUN NA 
316 ||lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
312 ΙΙΙ 
318 ΙΙΙ 





319 NINN NYMR AULA 
320 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
321 ΙΙΙ 
322 III: 
323 ΙΙΙ 
324 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
325 ΙΙΙ 
326 ΙΙΙ 
322 ΙΙΙ 
328 ΙΙΙ 
323 [ΙΙΙ 
330 JAN NEA UM 
331. [MANNA UN ADU M 
332 ΙΙΙ 
333 [|lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII:IIIIIIIIIIIIIII 
334 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
335 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
336 MANNA LM 
332 ΙΙΙ 
338 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
339 [lll 
340 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
341 [|1ΠΠΠΠΠΠΠΠΙΠΠΠ]ΠΠΠΠΙΙΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΙΠΠΠΠΙ 
342 ΙΙΙ 
343 ΙΙΙ 
344 lIIIIIIIIIIIIIIIIIIII!IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
345 MAIRIE 
346 MONKUO OA 
347 IllIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
348 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
349 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
350 [MAINTAINED 
351 [|ΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΠΙΠΠΠΠΠΠΠΠΠΠΠΙΠΠΙΠΠΙΙΠΠ 
352 IlIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
353 ΙΙΙ 
354 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
355 N OO NO 
356 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
352 ΙΙΙ 
358 ΙΙΙ 
359 [ΙΙΙ 
360 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
361 |lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 


w 





ια m 








LU ΙΙ ΙΙΙ 
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362 [IIIIIIIIII:IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
363 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
364 ΙΙΙ 
365 [ΙΙΙ 
366 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
367 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
368 ANDATI T O O 
365 ΙΙΙ 
370 ΙΙΙ 
321 ΙΙΙ 
322 lIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
323 ΙΒΜ 
324 llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
375 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
376 ΙΙΙ 
377 ΙΙΙ 
328 ΙΙΙ 
323 IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
380 |IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
381 ||IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
382 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
383 [IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
384 ΙΙΙ 
385 ΙΙΙ 
386 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIITIIIIIIIIII 
382 ΙΙΙ 
388 AINT UAM 
389 ΙΙΙ 
390 ΙΙΙ 
391 ΙΙΙ 
392 ΙΒΜ 
333 ΙΙΙ 
394 [ΙΙΙ 
355 ΤΝΤ 
396 ΙΙΙ 
332 ΙΙΙ 
398 [|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
399 I|IIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 
«00 ΙΙΙ 
4e1. ΙΙΙ 
«02 ΙΙΙ 
493 ΙΙΙ 
4e« llIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIIII 





AMA ΙΙ ΙΙΙ 


Resume Yes No 
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IIINIE The Rackseller 
ALABAMA 


























/ IOWA Mount Orab Mount Orab Radio Shack 
Birmingham Jefferson News Co . Ames Myers TV & Stereo Repair Toledo Leo's 
Florence Anderson News AT OKLAHOMA 
Greenville M&B Electronics/Radio Shack " 
Modison Madison Books Meus RSE RES TN Merit Computers 
ARKANSAS tend ids 
Fayetville Vaughn Electronics/Radio Shack η M Hecu s ad M η ΜῊΝ ide 
ARIZONA Prospect Faisoft, Inc. Woodburn Pioneer Electronics 
ών ranged Pio LOUISIANA PENNSYLVANIA 
ri-Tel 
Gretna Computer Supply Store Philadelphia Newsy 
D n Anderson News Co. Slidell Radio Shack Phoenixville Stevens’ Radio Shack 
i i MASSACHUSETIS Wind Gap Micro World 
κόμη, πε Liffleton Computer Plus RHODE ISLAND 
Half Moon Bay  Strawfiower Electronics σα Radio Shack Newport Kelly's Variety 
Livermore Software Galeria MICHIGAN TENNESSEE 
North Rochester Rochester Book Center Knoxville Anderson News Co. 
Hollywood Levity Distributors Sterling Heights Sowar c ο. Computer ph 
Santa Rosa Sawyer's 'ogroms, Inc. vil Mosko's Book Store 
Sunnyvale Computer Literacy Wyoming Gerry's Book Co. Smyrna Delker Electronics, Inc. 
COLORADO MISSOURI TEXAS 
Salida Radio Shack Independence Digital Enterprises, Inc. Bay City Impulse Computers 
DELAWARE St. Louis Software Center Ft. Worth A & A International 
Middletown Delmar Co. N VIRGINIA 
Wilmington Normar Inc.—The Smoke Shop Lincoln Hobby Town com oes “see & Period 
FLORIDA NEW HAMPSHIRE à Computer 
Boco Raton Software, Software, Inc. West Lebanon Verham News Corp. I Wytheville Electronics 
Davie Software Pius More NEW JERSEY , 
Ft. Lauderdale Software Connection Clinton Micro World ii Kennewick Satellite TV Specialists 
Ν. Miami Hackensack Total Circulation Service ΜΉΝ 
Beach Aimar Bookstore Pennsville Dave's Electronic Radio Shack once Emerald Computer 
Orlando à send wipe ; 2: NEW MEXICO WEST VIRGINIA 
Panama City omputer Systems Group Alamogardo New Horizons Computer Systems Lesage Pioneer Technology 
Penco MN ioe zw Albuquerque News and Bookstore T. WISCONSIN 
allahassee erson News Co. Page One Newsstand Ladysmith Electronics, Etc. 
GEORGIA NEW YORK Madison 20th Century Books 
Atlanta Guild News Agency Fredonia On Line: Computer Access Center ARGENTINA 
ILLINOIS Hudson Falls G.A. West & Co. Cordoba Informatica Y Telecomunicaciones 
Chicago ο a " NORTH CAROLINA CANADA: 
— ea š Cory News Center in Cary Village ALBERTA 
Kroch’s & Brentano's Syiva Total Data Systems Calgary Rainbow Software Services 
Wabash Ave. NORTH DAKOTA Edmonton CMD Micro 
Prairie News Agency Fargo Computer Associates Kelly Software Distributors 
Oakbrook Kroch's δι Brentano's OHIO puo COLUMBIA His GE 
INDIANA Blanchester JR Computer Control "y DON ROSATO ICS 
Highland Computer Health Consultants Cincinnati Cinsoft QUEBEC 
Scottsburg Radio Shack of Scottsburg Kenton TW. Hogan & Assoc., Inc. LaSalle Messageries De Presse Benjamin 
: NOVA SCOTIA 
Also available at selected B.Dalton Bookseller stores Halifax Atlantic News 
Ad 1 I d TAB CO. "" 
vertisers index CEO ee NUN. LIS AQ Meg Lt SDN VERI 55 
TRUE DATA 4 
ULTRA SOFT 
VCR 7 
y, ——————————ÓM— —— — — E AEE E:T νὰ ο δη 
AMERICAN CRYPTRONICS, INC. 32 
ARE ROYAL ee rites] 2. 
ATD 60 
BEAMAN PORTER ING ¿uu ÉL ce C ο με 
CHEAPWARE Š PCM Advertising and 
COMPUTER PLUS 66 
COMPUTER SOLUTIONS 107 





DFW COMPUTER CENTER — — —— το TL n V S26 
DELKER ELECTRONICS ος U ο ο Ας u. 238 
ENVISION DESIGNS: ee te ER 
FEDERAL HILE SOFTWARE SL UU L 0 LÁ L5 
PORT WORTH COMPUTERS U UL — a CE esc. u 34 


Marketing Representatives 


GROUP TECH 104 
HARD DRIVE SPECIALIST 70 
HOWARD MEDICAL 8 
LESCRIPT WORD PROCESSING SYSTEMS 45 
MARYMAC INDUSTRIES 115 
MICRO MAINFRAME 116 
NOCONA ELECTRONICS 53, 84 
OWL-SERVICES 104 
PCM BACK ISSUES. 113 
PCM BINDERS 48 








PCMPESI ΓΣ ——— ει να ες ee eG 
POM GIFT ΕΕ. —— e Se ee 
PCM ON DISS eeu ιαπ κ ος 5 
PERRY COMPUTERS 80 
PERSONAL INTERATED COMPUTER ο ——— —Á—  — 45 
PORTABLE COMPUTER 

SUPPORTOUROUP. C lIclÀÁIlIl— EE 89 106; BC 
POWERSOFT 37 
DR. PREBLE S PRODRAMS. —— — —Á—— IM 
PURPLE COMPUTING 
RADIO SHACK 18, 42, 50 
RAINBOW SUBSCRIPTION AD 7 

















77 
Cindy Shackleford Kim Vincent 


Director, West Coast Office Advertising Representative 
12110 Meridian South — Suite 8 The Falsoft Building 





RONALD F. BURKART {11 Ρ.Ο. Βοχ 73-578 Ρ.Ο. Βοχ 385 

ROSS COMPUTER SERVICES: = M Puyallup, WA 98373-0578 Prospect, KY 40059 
SVALT COMUTER CO) ING, —— (7 1 o Lis 

sorFrwRESUPORT. - — .— .——  — — —13 (206) 848-7766 (502) 228-4492 
130 PCM April 1986 


Ss 


κ X 


OOOO ——— i 





YES , m coming to Chicago! | want to save by buying tickets now at the special advance sale price. 


Please send me: 
three-day tickets at $9 each total 


one-day tickets at $7 each total 
(Circleone) Friday Saturday Sunday 
Saturday Breakfast at $12 each total 


Handling Charge $1 


(U.S. Currency Only, Please) 


O Also send me a hotel reservation card for the Hyatt 
Regency Woodfield ($60, single or double room). —— = "ch nn 
Make checks payable to: PCM. Mail to: PCMfest, The Falsoft Building, P.O. Box 385, U.S. Hwy. 42, Prospect, KY 40059. To make 


reservations by phone, call: (502) 228-4492. 


Advance ticket deadline: May 16, 1986. Orders received less than two weeks prior to show opening will be held for you at the door. 


TOTAL ENCLOSED _____ 








Name 
Address 
City CS AG 
Nelspnone — —  ——— IP 
Company 
O Payment enclosed, OR O Charge to: 

O VISA O MasterCard O American Express 


Account Number 
Exp. Date 
Signature 


Tickets will also be available at the door at a slightly higher price. Children under 4, free; 4 and over, full admission price. 
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All on one ROM. Truly the finest four programs 
available for the Model 100 — guaranteed. 

Try it for 30 days. If you aren’t blown away by the 
excellence return it for a full refund. 


The four best programs for the Model 
100 allon one ROM. 32K of power with» 
out using any RAM for program stor- 
| age. This is the PCSG \Snap-In ROM 
| that just presses easily. into the little 
1 ROM socket in the compartment on the 
| back. You access the four right from the 


jJ main menu like built-ins. 


Write. ROM. — the definitive word 
processor for the Model 100. Function 
key formatting or dot commands. 
Search and replace. Library feature. — 


ΓΙ inserts words, phrases or whole docu- 


Ἱ. ments into text from just a code, MAP 
4 lets you see.a picture of your document. 
| In all there are. 60 features and func- 
]- tions. No one can claim faster operation. 
| FORM lets you create interactive forms 


1 with on-screen prompts. that- you. can. 


answer from the keyboard, Nothing else 


for the Model 100 compares. with the . 


features: of. Write ROM, . Exactly. the 
same as the Write ROM sold as a single 
program. Infoworld: says it "makes the 
Model 100 a viable writing unit ... sur- 


passed our highest expectations. for 
quality and clarity.” l 

Lucid Spreadsheet: This is the one 
PICO magazine says “blows Multiplan 
right out of the socket" and Infoworld 
performance rated as "excellent" and 
said “makes, the Model 100 compute.” 
Gives you features you cannot get with 
Lotus 123. Lets ycu build spreadsheets 
in your Model 100 that would consume 
140-150K on a desktop. Program gener- 
ating capability with no programming 
knowledge required. . Variable column 
widths, Includes find and sort with func- 
tion key control. It’s fast, recalculates 
like lightning. No feature has been taken 
from the original, only new ones added. 

Database: This is a relational. data 
base like no other. You can do.every- 
thing from mailing lists. to invoices. No 
complicated pseudo-coding, you create 
input screens as simply as typing into 
TEXT. You are not limited by size; you 
can have as large an input screen as you 
wish. Prints out reports or forms, get- 
ting information: from as many files as 


(214) 351-0564. 


you like, Complete math between fields, 
Total interface with Lucid worksheets. 

Outliner: Does everything that Think- : 
tank does on a PC but a whole lot better. 
Includes a Sort for your headlines. Lets 
you have headlines of up to 240 charac- 
ters. Has cloning, hoisting and sideways 
scroll up to 250 characters. Like Lucid, 
this one sets a new standard for outlin- 
ers. This is the way to plan and organize 
your projects. 

Present Lucid and. Write ROM 


owners can upgrade for $125. If you f 


have both it’s $100. 

As usual PCSG sells the Super ROM 
on a thirty day guarantee. If for any. 
reason you are not. satisfied, simply 
return it for a full refund. 

We: are excited about this product: 


Super ‘ROM gives the Model 100 the Ρ | 


true power of a desktop. No other multi- 
program ROM has. software that com- 


pares. But don't take our word forit. We f τ 


invite you to make that comparison 
yourself. Priced at $199.95 on Snap-In 
ROM. | 


Got stuck with somebody else's multi-ROM? 
We'll upgrade it for τς 


PORTABLE COMPUTER SURRORT eS 


11035 Harry Hines Blvd.) #206, Dallas, TX 75229 - 
MC, Visa, American Express, Check, or C. O.D. ι 





